hilfe!repeat-schleife mit abbruchfunktion

[whiteshark]

@PierreB: deine Variante geht, aber man kann nicht abbrechen. Es fehlt eine Applikation.Processmessage;

Delphi-Quellcode:

var
test : Boolean;

//Jetzt die Schleife bei klick auf Button1
procedure form1.Button2click(Sender : TObject);
begin
repeat
//Dein Net Send Zeug
application.processmessage;
until test = true;
end;

//Jetzt bei Klick auf Button2 wirds abgebrochen
procedure form1.Button2click(Sender : TObject);
begin
test := true;
end;

Ich habe es bei mir probier, es sollte so gehen.