Dynamischer Btn und "verborgene virtuelle Methode?"

[sunshine-girl87]

Guten Morgen.

Habe einen Button dynamisch erstellt. Das funzt natürlich prima
Doch sobald ich dem btn eine OnClick-Prozedure zuweise

btn.OnClick:=Form1.Click kommt die Compilerfehlermeldung

Zitat von Compiler:

Methode 'Click' verbirgt virtuelle Methode vom Basistyp 'TControl'

So jetzt hatte ich was mit override gelesen, aber das hat auch mein Problem nicht gelöst.
Möchte einfach nur eine Prozedur einem dyn. OnClick zuweisen.

Danke für eure Hilfe!

[Sharky]

Hai,

so sollte es gehen

Delphi-Quellcode:

Type 
.
  private
    { Private-Deklarationen }
    procedure myOnClick(Sender: TObject);
  end;

implementation

procedure TForm1.myOnClick(Sender: TObject);
begin
  ShowMessage('blubb');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Btn_Test.OnClick := myOnClick;
end;

[sunshine-girl87]

Hm,

ich bin der Meinung, dass ich das schon mal hatte. So ist es ja eigentlich logisch...

Egal! Funzt trotzdem super! Danke