а я уже интересовался раньше этим вопросом
вот такой код мне посоветовали:
PHP код:
procedure OnTimer01(Sender: TObject);
begin
Timer01.interval := 1000+round(random()*1000);
case a of
1:begin
buf:=HStr('04 70 19 10 48 5E C7 01 00 FF 2A 01 00 51 F5 FF FF 00');
SendToServer;
inc(a);
end;
2:begin
buf:=HStr('04 70 19блаблабла****