Hola, tengo un problema urgente que me impide ver unos gráficos con claridad...
estoy cargando unos datos de 8 bits desde el puerto serial en un memo, usando el comport1, y quiero que al recibir un dato y su correspondiente retorno de carril (\r en c es el equivalente a #13 en delphi cierto??) coloque el dato y salte a la siguiente línea en el memo...
tengo algo asi en el procedimiento correspondiente a la lectura de los bytes...
Cita:
procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer);
var
temp: String;
n:integer;
begin
comport1.ReadStr(temp,count);
for n := 0 to count-1 do
begin
if ((temp[n]=#13) or (temp[n]=#10)) then
begin
if temp[n]=#10 then
begin
memo1.Lines.Add('');
end;
end;
end;
memo1.Text:=memo1.Text+temp;
end;
|
este codigo me lo dio un amigo... yo soy primerizo en delphi y no se como corregir este problema, espero que alguien entienda lo que puse y me pueda ayudar, es el unico problema que tengo...
al mostrar los datos leidos del puerto serial en el memo,los tira a un grafico y ahi aparece el problema, pues al hacer la transformacion de bits a numeros decimales, como tengo 256 niveles, obtengo algunos niveles que son menores que 100, y no me los muestra bien, o no salta a la siguiente linea del memo...
alguien que me ayude por favor que tengo que terminarlo hoy!!!!