2013-05-11 2 views
1

Я хотел бы предоставить пользователю множество вариантов с помощью combobox. Итак, есть 2 combobox. Первая имеет около 5 вариантов, а вторая - будет создана на основе того, что пользователь выберет в первом поле со списком.Delphi7, создавать объекты со списком

До сих пор, я попытался это: Combobox2.Items.Strings[1]:='xxxx' который появляется мне эту ошибку:

List out of Bound. 

Что я должен делать?

+0

Я несколько удивлен, что вы не обнаружили метод 'Add' свойства' Items' с помощью CodeInsight. Или что вы не пробовали. –

+0

ahaha, я уже открыл этот метод, когда я работал с записками, и с тех пор я никогда не использовал их снова ... Спасибо Andreas – user2296565

ответ

3

для заполнения TComboBox во время выполнения, вы можете сделать так:

ComboBox1.Items.BeginUpdate; 
ComboBox1.Items.Clear; 
ComboBox1.Items.Add('Alpha'); 
ComboBox1.Items.Add('Beta'); 
ComboBox1.Items.Add('Gamma'); 
ComboBox1.Items.Add('Delta'); 
ComboBox1.Items.EndUpdate; 

Вы также можете назначить фабрично TStringList к нему.

+0

Ну, в вашем случае, очевидно, это 'ComboBox2'. –

+0

Я знаю, что я не такой любитель .... Хорошо, может быть, я – user2296565

+0

Хорошо, но есть проблема ... Всякий раз, когда я выбираю элемент, он не отображается в тексте combobox – user2296565

-2

Событие onSelect ComboCox1

процедура TForm1.ComboBox1Select (Sender: TObject);

начинают

ComboBox2.Text: = ComboBox1.Text;

конец;

Смежные вопросы