Komponente A soll OnClick Routine von Komponente B aufrufen

[ChrisE]

Delphi-Quellcode:

procedure TForm1.UpDown1Changing(Sender: TObject;
var AllowChange: Boolean);
begin
    if Assigned(Rathaus.OnClick) then
    begin
      Rathaus.OnClick(Rathaus);
    end;
end;

Greez, Chris

[Edit] Rechtschreibfehler[/Edit]