Вопрос по Combobox

[MSD]

Добрый день спецы. Ответьте пожалуйста. Как в комбобокс задать условие смены, допустим если combobox.itemindex=2 и я меняю на другой combobox.itemindex=3 или 1 или пяти без разницы, то в эдит пишет 'Выполнено'. Задача вроде простенькая а решить ни как не могу. Спасибо.

[vovk]

обрабатывать событие комбобока onselect

[Sensizu]

Ну да, в событиях прописать код.

procedure combobox.onselect(...);
begin
Edit1.text="Выполнено";
end;

Описание процедуры корявое - сразу говорю. DlbClick по названию события решает все формальные проблемы. Найди только правильное и нужное тебе событие.

[MSD]

Сообщение от Sensizu

Ну да, в событиях прописать код.

procedure combobox.onselect(...);
begin
Edit1.text="Выполнено";
end;

Описание процедуры корявое - сразу говорю. DlbClick по названию события решает все формальные проблемы. Найди только правильное и нужное тебе событие.

И как примерно это отнести к моей задаче, не совсем умею события описывать..(

[Sensizu]

MSD, каждый элемент имеет свои параметры. Ты их видишь сразу же внизу слева (если желания играться с расположением интерфейса не было, то окошечко там и есть), там же и есть другая вкладка "Events" (если не ошибаюсь), в которой расположены события (OnClick, OnDblClick, OnChange и так далее). Напротив каждого события есть пустая форма (в случае если к событию не приписана процедура). Твоя задача дважды кликнуть на поле ввода напротив события OnSelect - это автоматически создаст новую процедуру и припишет её в исполнение на событие OnSelect.
Всё что помнил по памяти - рассказал.

[Sensizu]

procedure TForm1.ComboBox1Select(Sender: TObject);
begin
Edit1.Text:='Выполнено!';
end;

На форме лежит ComboBox и Edit. Всё работает.

[MSD]

Сообщение от Sensizu

procedure TForm1.ComboBox1Select(Sender: TObject);
begin
Edit1.Text:='Выполнено!';
end;

На форме лежит ComboBox и Edit. Всё работает.

Наверное мы не совсем понимаем друг друга.)
Итак еще раз:
1. на форме Комбобокс и едит
2. в комбобокс итемс заполнено:
Раз
Два
Три
четыре
3. Значение комбобокс значально может быть любым, т.е. или раз или два или три или четыре, но если значение комбобокса равно допустим двум и с него (с этого значения) выполняется смена на другое, тогда в едит появляется "выполнено". Вот.

[Sensizu]

Ну в таком случае просто проверку делаешь и всё :

procedure TForm1.ComboBox1Select(Sender: TObject);
begin
if ComboBox1.Text='Два' then 
Edit1.Text:='Выполнено!' else Refresh;
end;

Тут правда два варианта: значение текст может передать Вам значение текущей (уже выбранной) строки.

[MSD]

Спасибо вопрос исчерпан! +