Hallo Int3g3r,
z.B. so:
Delphi-Quellcode:
Function Block1: Boolean;
begin
Block1:= False;
// mach was..
...
Block1:= True;
end;
Procedure Block2
begin
// mach was.. aber Block1 muss abgearbeitet sein.
end;
...
//warten.. sicherstellen daß Block1 fertig ist
MassageBox('Bitte warten etc.');
IF Block1 Then Block2;
Gruß, Andreas
Hinweis: die Nutzung des Funktionsnamens zur Rückkage des Rückgabewertes der Funktion ist in Delphi
heutzutage nicht mehr üblich. Man würde es result zuweisen: result := false; usw.