Um nochmal auf das Array of Buttons zurückzukommen.
Das geht natürlich auch. Nur musst Du dann natürlich diese auch selber erzeugen und positionieren usw.
Also sowas:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
| hButton : Array[1..50] of TSpeedButton; // Gobal angelegt
In Form.Create dann:
For i := 1 to 50 do begin
hButton[i] := TSpeedButton.Create(Self);
With hButton[i] do begin
Parent := <zB Form1 oder GroupBox>
Height := ....
Width := ....
OnClick := <ClickProzedur>;
..... usw.
end;
end; |
Danach kannst dann einfach mit hButton[<nummer>] auf jeden Button zugreifen.
Nur der Vollständigkeit halber. Für Deinen Einsatz ist das von Peter sicher weniger aufwändig.
"Der Mensch ist nicht was er sich vorstellt oder wünscht zu sein, sondern das was andere in ihm sehen."
