Foros Club Delphi - Ver Mensaje Individual

[egostar] · #13 24-02-2008

Para hacer pausas entre cada envio se usa la función Sleep(), puedes ir jugando con los valores, tal vez tambien necesites hacer alguna pausa antes de leer el puerto.

Yo haría una pausa mas larga, por ejemplo 120 ms entre envio y envio y una pausa de 256 ms antes de leer el puerto.

Código Delphi [-]procedure TForm1.FormCreate(Sender: TObject);
begin
   Comport1.Connected:=true;
   Comport1.WriteStr(#2);
   Sleep(120);
   Comport1.WriteStr(#0);
   Sleep(256);
end;

Salud OS