Установить одинаковые значения
Form1->DBLookupComboBox1->ListSource=DM1->DSIn;
Form1->DBLookupComboBox2->ListSource=DM1->DSIn;
...
...
Form1->DBLookupComboBox10->ListSource=DM1->DSIn;
хочется сделать:
int i;
for (i=1; i<11; i++)
Form1->DBLookupComboBox(?)->ListSource=DM1->DSIn;
Как это сделать, чтобы вместо вопроса в цикле
подставлялось значение i ?
Спасибо за внимание!
Цитата:
Originally posted by Victor_F
В программе установлено:
Form1->DBLookupComboBox1->ListSource=DM1->DSIn;
Form1->DBLookupComboBox2->ListSource=DM1->DSIn;
...
...
Form1->DBLookupComboBox10->ListSource=DM1->DSIn;
хочется сделать:
int i;
for (i=1; i<11; i++)
Form1->DBLookupComboBox(?)->ListSource=DM1->DSIn;
Как это сделать, чтобы вместо вопроса в цикле
подставлялось значение i ?
Спасибо за внимание!
В программе установлено:
Form1->DBLookupComboBox1->ListSource=DM1->DSIn;
Form1->DBLookupComboBox2->ListSource=DM1->DSIn;
...
...
Form1->DBLookupComboBox10->ListSource=DM1->DSIn;
хочется сделать:
int i;
for (i=1; i<11; i++)
Form1->DBLookupComboBox(?)->ListSource=DM1->DSIn;
Как это сделать, чтобы вместо вопроса в цикле
подставлялось значение i ?
Спасибо за внимание!
Заведи массив TDBLookupComboBox-ов.
Цитата:
Originally posted by Victor_F
В программе установлено:
Form1->DBLookupComboBox1->ListSource=DM1->DSIn;
Form1->DBLookupComboBox2->ListSource=DM1->DSIn;
...
...
Form1->DBLookupComboBox10->ListSource=DM1->DSIn;
хочется сделать:
int i;
for (i=1; i<11; i++)
Form1->DBLookupComboBox(?)->ListSource=DM1->DSIn;
Как это сделать, чтобы вместо вопроса в цикле
подставлялось значение i ?
Спасибо за внимание!
В программе установлено:
Form1->DBLookupComboBox1->ListSource=DM1->DSIn;
Form1->DBLookupComboBox2->ListSource=DM1->DSIn;
...
...
Form1->DBLookupComboBox10->ListSource=DM1->DSIn;
хочется сделать:
int i;
for (i=1; i<11; i++)
Form1->DBLookupComboBox(?)->ListSource=DM1->DSIn;
Как это сделать, чтобы вместо вопроса в цикле
подставлялось значение i ?
Спасибо за внимание!
св-ва TForm::ComponentCount, TForm::Components и функция TObject::ClassNameIs("TDataSource")