[JoseFco]

Regresando al anterior procedimiento.

Código Delphi [-]
 5: begin // Comando para escribir el chip(06 04 00 00 10 00)
         ComPort.WriteStr(#6#4#0#0#16#0);
            sleep(100);
            ComPort.WriteStr(Memo1.Text[1]);
               Contador := 2;
      end;
     end;
     end
         else if Str = #2 then begin
         end
           else if Str = #83 then begin
               if contador <= 4096 then begin
                ComPort.WriteStr(Memo1.Text[Contador]);
                Inc(Contador);
     end;
     end;
     end;

Este copila sin problema y rueda bien.Manda los 4096 bytes y recibe los 53h 83d.
Pero manda caracteres ascii, un ejemplo de lo que esta mandando:
Los dos primeros bytes de data en el memo son:

00 12 y lo que sale por el serial port es: 20 30 30 20 31 32 20=espacio 30=0 30=0 aqui "00" otro 20=espacio 31=1 32=2 aqui el "12".

Asi esta la cosa.

Un Saludo.