Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.07.22;
Скачать: CL | DM;

Вниз

Реакция combobox   Найти похожие ветки 

 
Infinityx93 ©   (2007-05-17 13:58) [0]

Помогите пожалуйста, заполняю combobox, оч надо при выборе определенного элемента из списка, что бы запускалась какая-нибудь процедура.

Нашел в Сети:
Type
  TComboCracker = class(TCombobox);

procedure SetComboboxIndex(ACombobox: TCombobox; Index: Integer);
begin
  ACombobox.ItemIndex := Index;
  TCombocracker(ACombobox).Click;
end;
по идее как раз для меня но не понимаю как пользоваться =(
СПАСИБО.


 
tesseract ©   (2007-05-17 14:11) [1]


procedure TForm1.ComboBox1Change(Sender: TObject);
begin
 case Combobox1.ItemIndex of
 -1:    fail;
 0:     proc1;
 1:     proc2;
 2:     proc3;

 end;
end;


 
Infinityx93 ©   (2007-05-17 14:30) [2]

СПАСИБО ОГРОМНОЕ, только не понял зачем -1 :fail???


 
{RASkov} ©   (2007-05-17 14:53) [3]

> [2] Infinityx93 ©   (17.05.07 14:30)
> только не понял зачем -1 :fail???

Если в ComboBox1 ничего не выбрано, то.... обработай так как тебе нужно.



Страницы: 1 вся ветка

Текущий архив: 2007.07.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
2-1183048916
Yurish
2007-06-28 20:41
2007.07.22
TClientSocket TServerSocket таковых в Делфи 7 нет?


15-1182306120
Slider007
2007-06-20 06:22
2007.07.22
С днем рождения ! 20 июня 2007 среда


15-1182770012
DrAndrew
2007-06-25 15:13
2007.07.22
Как записать значение языка в ini файл при инсталляции Inno Setup


11-1166033779
NeeDiGeo
2006-12-13 21:16
2007.07.22
Глобальные клавиши


2-1182803080
медиатор
2007-06-26 00:24
2007.07.22
перемотка