Mehrere Objekte Ansprechen:Beispiel Buttons !

[Semikolon]

Hallo Leute !

Dies ist mein erster Beitrag hier,ich hoffe auf ein gutes Verhältnis.

Freut mich hier zu sein,bei euch Pros.

Hab eine Frage,wegen der ich gestern fast geheult habe.

Wie kann ich Objekte,also Labels und Buttons per Integer ansprechen?

Beispiel:

Ich habe 3 Buttons (button1,button2,button3).Ich möchte per for-Schleife die Caption

aller auf "test" ändern.

So gings nicht:

###

Delphi-Quellcode:

var a:integer
procedure ...
begin
for a:=1 to 3 do tbutton('button' + inttostr(a)).caption:='test'
end;

###

Wie schaft man das?

[Zacherl]

FindComponent lautet das Zauberwort

Delphi-Quellcode:

var 
  i: integer 
begin 
  for i := 1 to 3 do 
    TButton(FindComponent('Button' + IntToStr(i))).Caption := 'test'; 
end;

Florian

[TeronG]

mach doch n Array [1..3] of label .... oder versuche findcomponente

[Semikolon]

Boah danke Florian. Vielen Dank !

PS:Teron dein Tip ist auch nicht schlecht ! An sowas hab ich bis jetzt noch nicht gedacht!

[TeronG]

Zitat von Semikolon:

Boah danke Florian. Vielen Dank !

[Zacherl]

Zitat von Semikolon:

Boah danke Florian. Vielen Dank !

Immer wieder gerne

[3_of_8]

FindComponent ist ein recht schlechter Stil.

Strings vergleichen dauern relativ lange, vor allem wenn man sequentiell durch das ganze Components-Array durch muss.

Wenn du die Komponenten, die du brauchst, in ein Array packst, hast du indizierten Zugriff, das heißt das Ganze geht sehr viel schneller.

Nebenbei: Die wenigsten hier sind Pros. Ich zum Beispiel bin keiner.

[Semikolon]

Mir erschließt sich in puncto Arrays eine neue Frage,die im Prinzip auf die obere verweist:

Wenn ich 50 Buttons(button1,button2,...) habe,dann muss ich die ja noch in den Array[1..50] of Buttons alle EINZELN per Hand eintragen.Wie kann ich das in einer FOR-Schleife machen und den Integer gleich nutzen?

ungefähr:

for i:=1 to 50 do ArrayDerButtons[i]:=tbutton('button'+inttostr(i)); Mein Hauptproblem ist,wie ihr merkt,wie ich Integer oder Strings in Componentnamen umforme.

[Dax]

Zitat von Florian Bernd:

FindComponent lautet das Zauberwort

[Cöster]

dann musst du wohl doch Findcomponent nehmen, allerdings nur einmal um in den Array einzulesen. Alternative wär halt alles einzeln zu machen.