Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#2

AW: "reference to procedure" vs. "procedure"

  Alt 29. Jan 2018, 12:29
Nein.

PS: Der Compiler macht da ein generiesches Interface drum
Delphi-Quellcode:
TProcObject = class(TGeheimesInterface)
  FGesharteVariablen: IVariablen;
  FProc: procedure();
  FEvent: procedure() of object;
  ...
  procedure Call;
end;

TProcObject.procedure Call;
begin
  if Assigned(FProc) then
    FProc(FGesharteVariablen);
  if Assigned(FEvent) then
    FEvent(FGesharteVariablen);
  ...
end;
$2B or not $2B

Geändert von himitsu (29. Jan 2018 um 12:34 Uhr)
  Mit Zitat antworten Zitat