but thats not exactly what i wanted... i will make smt like this // StopProcedure(Haf); and ContinueProcedure(Haf); this procedures dont exist, but i will make smt like this
Delphi-Quellcode:
procedure Haf;
var i:integer;
begin
i:=0;
repeat
StopProcedure(Haf); //this stops the procedure, but local variables, nothing will be lost, smt like it freezes the procedure for a while
input[i]:=Edit1.text;
i:=i+1;
until i=3;
end;
//we can work with the program and when we press Button, Haf will contiue
procedure ButtonClick;
begin
ContinueProcedure(Haf);
end;
i hope its a bit clearer now
