Mehrere Komponenten gleichzeitig ansprechen ?

[newuser01]

Hallo

folgendes soll erreicht werden

Delphi-Quellcode:

CheckBox1.Visible := true;
CheckBox2.Visible := true;
CheckBox3.Visible := true;
CheckBox4.Visible := true;
CheckBox5.Visible := true;
CheckBox6.Visible := true;
CheckBox7.Visible := true;
CheckBox8.Visible := true;
CheckBox9.Visible := true;
CheckBox10.Visible := true;

ist es möglich nicht jede CheckBox einzeln anzusprechen sondern vielleicht CheckBox1 bis CheckBox10 Visible := true oder so

[mkinzler]

Such mal nach FindComponent

[sirius]

Du kannst mit einer For-Schleife und "Findcomponent" arbeiten. Du kannst ein array of checkbox machen. Du kannst dir deine eigene Klasse darumbasteln, etc. pp. Das sieht vielleicht alles etwas schicker in Pascal aus als jetzt. Allerdings wird der Code dadurch i.A. langsamer.

[newuser01]

ok thx werde mal nach FindComponent schauen und testen falls ich dann noch fragen habe oder damit nicht zurechtkomme meld ich mich noch mal :-D

[Joe_the_Junkie]

Also als Queltext müsste es dann so aussehen:

Delphi-Quellcode:

for i := 1 to 10 do
     begin
        TCheckbox(findcomponent('Checkbox' + inttostr(i))).Visible := true;
     end;