Hi Aviator
Ja, den hab ich gesehen, zwar erst kürzlich, aber...
Und eigentlich machst du da genau das, was ich versucht habe: Im Eventhandler einen andern Bezeichner verwenden, als bei der Tip-Deklaration. Wobei ich gerade sehe, dass du die abweichenden Variablen schon beim abfeuern verwendest; jene im Eventhandler sind eigentlich schon die zweite abweichende Variablengruppe, da sie anderswo deklariert sind.
Delphi-Quellcode:
TMyEvent = procedure(Street: string; Country: string) of object;
...
if Assigned(FOnReport) then
FOnReport(tmpStreet, tmpCountry); // Hier wird das Event ausgelöst
...
// EventHandler für TMyClass.OnReport
// Hier könnten die Parameter Bezeichner sogar schon von der Event-Deklaration abweichen
// Wichtig sind die Datentypen. Die müssen in Reihenfolge und Typ mit der Event-Deklaration übereinstimmen
procedure TForm1.ReportHandler(Street: string; Country: string);
begin
ShowMessage(Street + sLineBreak + Country);
end;
Und das entspricht meinen Deklarationen.
Gruss
Delbor