@pacman
Sorry die 3 für die Methode plus
Delphi-Quellcode:
procedure TDemo_Form.FormCreate(Sender: TObject);
begin
Button1.OnClick := AlleButonOnClick;
Button2.OnClick := AlleButonOnClick;
Button3.OnClick := AlleButonOnClick;
Button4.OnClick := AlleButonOnClick;
end;
Ist ja auch egal ich würde es halt über den Objektinspector lösen.
