Button.color in schleife ändern??

[snow]

So ich schon wieder.

ICh würde gern einige buttons und labels verändern. Die Buttons und labels werden einfach aufgezählt

Button1; Button2; button3 etc

Weil ich keine 32 Zeilen unübersichtlichen Quelltext haben will, dachte ich das ich die 32 objekte in einer For-schleife
verändern kann.

Das ganze soll etwa so aussehen.

Delphi-Quellcode:

var lokal = integer;
For lokal:=1 to 16 do begin
Button(lokal).color:='clred'
Label(lokal).caption:=(Inttostr(viel mathematik));
end;

Doch so geht es nicht??

wie kann ich die zahl nach dem Button verändern???


MfG snow

[Muetze1]

Schau dir mal die Methode FindComponent() an. Im Forum findest du dazu auch genug Beispiele.

[Dezipaitor]

http://www.delphipraxis.net/internal...t.php?t=111805

[turboPASCAL]

Und ändere mal bitte den Titel !

Zitat:

... in schleiße ändern??

Man(n) könnte sich verlesen.

[snow]

So ich hab jetzt das

Delphi-Quellcode:

for lokal:= 1 to 16 do begin
     (FindComponent('MGkeyboardlabel' + IntToStr(lokal)) as TLabel).Caption:=(Inttostr((Keyboardnummer.value-1)*16 + lokal));
     (FindComponent('MGkeyboardbutton' + IntToStr(lokal)) as TSpeedbutton).Color:=clred;
     end;

Läuft....

Mfg Snow