[[egostar]]

Y si intentas con esto amigo Jose

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.Write(Buffer[1],1);
          Contador := 2;
       end;
   end;

   else if Str = #83 then begin
            if contador <= 4096 then begin
               ComPort.Write(Buffer[Contador],1);
               Inc(Contador);
         end;
     end;
     end;

Salud OS