Zur Laufzeit erstellte Buttons - OnClick weigert sich

[tkoenig]

Ja, dass die Buttons jetzt nicht mehr zum Grid gehören, ist mir auch aufgefallen.. Gibt es dafür einen einfachen Workaround?

[SirThornberry]

Ich würde das ganze wieder aufs Grid packen und versuchen heraus zu finden wo das Click verschwindet. Denn zum Beispiel MouseDown und MouseUp funktionieren beim Button weiterhin auch wenn der Parent des Buttons ein StringGrid ist (notfalls kann man sich sein eigenes Klick basteln was auf Grundlage von MouseDown und MouseUp arbeitet)

[EWeiss]

Ich würde die Winmessagen umleiten also das grid subclassen.

gruss

[blackfin]

Zitat:

Ich würde die Winmessagen umleiten also das grid subclassen.

Der Satz hat gute Chancen, Aussage des Jahres zu werden

[EWeiss]

Zitat von blackfin:

Zitat:

Ich würde die Winmessagen umleiten also das grid subclassen.

Der Satz hat gute Chancen, Aussage des Jahres zu werden

Wie meinst das ?
War ernst gemeint.

Aber davon ab verstehe ich nicht warum man hier ein ClickAction benötigt die Button müßten weiterhin auf das clicken reagieren können auch ohne
extra event.

gruss

[blackfin]

Zitat:

Wie meinst das ?
War ernst gemeint.

Deine Aussage war ja auch richtig!
Ich musste nur schmunzeln, als ich realisiert habe, was für ein Fachbegiff-Denglisch der Satz ist
Nix für ungut

Ja ich bin doof

[EWeiss]

Zitat von blackfin:

Zitat:

Wie meinst das ?
War ernst gemeint.

Deine Aussage war ja auch richtig!
Ich musste nur schmunzeln, als ich realisiert habe, was für ein Fachbegiff-Denglisch der Satz ist
Nix für ungut

Ja ich bin doof

Ach jo sorry mein denglish ist nicht das beste hehehehe (ne 6 dafür ist gar nicht's aber 7 gibts ja leider nicht!)
Ich lerns nimmer.

Ja ich bin doof
Denke nicht..

gruss

[himitsu]

Zitat von tkoenig:

Delphi-Quellcode:

SetLength(Buttons,high(Captions)+1);
for i := 0 to high(Buttons) do
  SetLength(Buttons[i],StringGrid.RowCount-StringGrid.FixedRows);

Delphi-Quellcode:

Buttons[i,j].Name := 'TBGButton_'+inttostr(i)+'_'+inttostr(j);
Buttons[i,j].Tag := strtoint(inttostr(i) + inttostr(j));

Damals reichte es, wenn die Noten nur bis Fünf gingen, aber heutzutage braucht man schon die 6.

Wo hier nun schon Viele beim Problem mit dem OnClick helfen...

Da du deine Buttons sowieso in einem Array verwaltest und vermutlich kein FindComponent verwendest, kannst'e auf den Komonentennamen verzichten.
> die VCL braucht den Namenm um die gleichnamige Form-Variable mit der Komponente in der DFM zu verknüpfen und um eventuell die Komponenten untereinander zu verknüpfen (wie z.B. Eine ImageList irgendwo zuweisen).
> und man braucht den Namen, wenn man darüber eine Komponete suchen will, wie z.B. über FindComponent (was aber auch oftmals anders/besser/schneller geht)

Der Tag wird bestimmt falsch berechnet, denn
[1, 3] = 4 und [3, 1] = 4 .

Und da das Array sowieso quadratisch wird, kann man alle ebenen auch gleichzeitig setzen.

Delphi-Quellcode:

SetLength(Buttons, Length(Captions), StringGrid.RowCount-StringGrid.FixedRows);
for i := 0 to high(Buttons) do

[schlecki]

Zitat von himitsu:

Der Tag wird bestimmt falsch berechnet, denn
[1, 3] = 4 und [3, 1] = 4 .

wenn du dich da mal nicht vertan hast:

Zitat:

...Tag = strtoint(inttostr(i) + inttostr(j));

sollte also

[1, 3] = 13 und [3, 1] = 31 liefern. Problematisch wird es trotzdem bei [11, 1] = 111 = [1, 11]

[ibp]

Zitat von schlecki:

Zitat von himitsu:

Der Tag wird bestimmt falsch berechnet, denn
[1, 3] = 4 und [3, 1] = 4 .

wenn du dich da mal nicht vertan hast:

Zitat:

...Tag = strtoint(inttostr(i) + inttostr(j));

sollte also

[1, 3] = 13 und [3, 1] = 31 liefern. Problematisch wird es trotzdem bei [11, 1] = 111 = [1, 11]

das Problem könnte man mit einer durchgehenden Nummerierung umgehen und hätte dann auch nicht die doppelten Konvertierungen...

...Tag:=1+j*(high(Buttons)+1)+i