Einzelnen Beitrag anzeigen

TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
2.765 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: Sicherstellen das Procedure abgearbeitet wurde

  Alt 11. Sep 2019, 22:15
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.
  Mit Zitat antworten Zitat