Ja, aber mit der Endlosschleife und dem ProcessMessages hast du ja ne CPU Auslastung von 100%
Ich würd das so machen:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
//Dein Net Send Zeug
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Interval := 100;
Timer1.Enabled := True;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Enabled := False;
end;