Button Ereignis geben

[HollowMan_COS]

:?:
Hallo,

brauche dringend Hilfe.

Habe eine normale String-Grid-Komponente in mein Projekt integriert. In dieser Grid werden zur Laufzeit Buttons in bestimmten Zellen erstellt. Diesen Buttons soll ein OnClick-Ereignis zugeordnet werden.

Habe es schon folgendermaßen versucht, leider ohne Glück:

Delphi-Quellcode:

btnEdit:=TBitBtn.Create(Self.Grid); 
btnEdit.Parent:=Self.Grid; 
btnEdit.OnClick:=btnEditClick; 
btnEdit.BoundsRect:=Self.Grid.CellRect(8, Self.Grid.RowCount - 1); 
btnEdit.Name:='btnEdit' + IntToStr(Self.Grid.RowCount - 1); 
btnEdit.Caption:='Bearbeiten';

Bei dem btnEditClick handelt es sich um ein TNotifyEvent, das ich folgendermaßen initialisiert habe:

Delphi-Quellcode:

 
btnEditClick:=GridButtonsEditClick;

Bei GridButtonsEditClick handelt es sich um eine Prozedur.

Kann mir jemand sagen, wie ich dem Button ein bestimmtes Ereignis zuweisen kann?

Hoffe mir kann jemand helfen.

PS: Als Anlage habe ich ein Bild hinzugefügt, wie der Spass aussieht.

Danke schon im vorraus.

[Phoenix]

Hi HollowMan,

erstmal herzlich Willkommen in der Delphi-PRAXiS ;-)

Das sieht schonmal richtig gut. Wegen dem Zuweisen der Methode:

Du erzeugst einen BitButton. Guck mal, wie der Methodenaufruf aussieht, wenn Du den Button auf ein Form ziehst. Die Parameterliste die dann dort erzeugt wird muss mit der Methode, die du dem dynamischen Button später zuweisen willst ja identisch sein.

Du erstellst also einfach eine Methode mit exakt diesen Paramateren (hab leider an dem Rechner hier kein Delphi, sonst könnt ich Dir ein Beispiel geben), und weise dem OnClick - Ereignis einfach diese Methode zu. Der Trick ist wirklich nur die Parameterliste.

[Christian Seehase]

Moin HollowMan,

erst einmal herzlich willkommen hier in der Delphi-PRAXiS.

Das Problem hatten wir gerade erst.
Der "Trick" besteht darin das StringGrid auf ein Panel zu legen, und dann als Parent für die Button das Panel anzugeben. Dann funktioniert's, ganz normal, wie bei jeder dynamisch erzeugten Kompo.

[Luckie]

Geschlossen wegen: http://www.delphi-forum.de/viewtopic.php?p=95373#95373

Ich habe eine ausführliche Begründung im DF gepostet.