Ereignis wird nicht zu Ende geführt (früher "... ausgelöst")

[himitsu]

Delphi-Quellcode:

type
  // Prozedurzeiger
  x = procedure;

  // Methodenzeiger
  x = procedure of object;

// "reguläre" Prozedur (oder Funktion)
procedure ThreadEnde(TheObject: TMyObject);
begin
end;

// Methode
procedure TForm1.ThreadEnde(TheObject: TMyObject);
begin
end;