PDA

Просмотр полной версии : СomboBox


goodvin1709
16.05.2011, 22:41
Научите работать з СomboBox в ПХ
Ну я создал в ПХ его но в его списку нефига нету((
как туда чтото всунуть..
Я должен их комбобокса выбрать цыфру 1 или цыфру 2 и нажать на кнопку
и должно появится в мемо инфа взависимости от цыфры она меняется
как ето зделать

Добавлено через 2 минуты
Вставить смог теперь нада чтобы при нажатии клавишы оно считало его
и вывело инфу в мемо

Добавлено через 27 минут
http://rghost.ru/6656011|
Вот исходкик он должен строить в мемо
CharStatus(STAND,==,1) такое и другие примеры как ето зделать?

wimax
17.05.2011, 04:19
наверно надо сначало чемто наполнить комбо бокс не?

Kilatif
17.05.2011, 06:49
wimax, если ты качал исходик, то видел, что он уже их наполнил.
goodvin1709, когда ты выбираешь из списка CheckBox'a, то автоматически свойству CheckBox'a ItemIndex (которое можно получить, например так: CheckBox1.ItemIndex) присваивается порядковый номер выбранной строки в списке (нумерация строк идет с 0. Если не выбрано ничего, то ItemIndex = -1). Т.е. Что бы получить текст из выбранной строки, нужно взять CheckBox1.Items[CheckBox1.ItemIndex]

goodvin1709
17.05.2011, 10:50
Делал так
procedure TForm1.FormCreate(Sender: TObject);
begin
combobox1.Items.Add('1');
combobox1.Items.Add('2');
combobox1.Items.Add('3');
combobox1.Items.Add('4');

end;

procedure TForm1.Button2Click(Sender: TObject);
begin
if comboBox1.Items[ComboBox1.ItemIndex]='1' then
label2.Caption:='верно 1';
if comboBox1.Items[ComboBox1.ItemIndex]='2' then
label2.Caption:='верно 2';
if comboBox1.Items[ComboBox1.ItemIndex]='3' then
label2.Caption:='верно 3';
end;
РАБОТАЕТ

NLObP
22.05.2011, 00:37
goodvin1709, посмотри мой скрипт рыбалки, там есть работа с комбобоксом.