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

Delphi-Quellcode:

btn.OnClick:=Form1.Click

kommt die Compilerfehlermeldung

Zitat:

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