Mehreren Comboxen einen Wert zuweisen

[Luckner]

Hallo,

wie kann ich mehreren Comboboxen einen Text (hier '') zuweisen. Die Comboboxennamen unterscheiden sich nur an der letzten Stelle. So, wie ich es versucht habe funktioniert es nicht.

Delphi-Quellcode:

       for i := 1 to 6 do
         begin
           oCombo.Text := '';
           FindComponent('ComboBoxNummerierung' + IntToStr(i)) as TComboBox  := oCombo;
         end;

Bitte um Hilfe.

Danke Luckner

[rapante]

Probiers mal so

Delphi-Quellcode:

       for i := 1 to 6 do
         begin
           TComboBox(FindComponent('ComboBoxNummerierung' + IntToStr(i))).Text := '';
         end;

[Luckner]

Hallo rapante,

es funktioniert. Danke.

Luckner.