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

Вниз

Как не позволять пользователю изменять значения в TComboBox?   Найти похожие ветки 

 
AM   (2002-10-03 16:51) [0]

Доброго времени суток? Подскажите про сабж. Чтобы даже список значений еиму не был виден.
Только Enable:= False не подходит, так как компонент становится "блеклым". Использовать надо именно TComboBox, так как в определенных ситуациях (очень редко) надо позволить пользователю менять значения.


 
Демонов Е.В. ©   (2002-10-03 16:52) [1]

>>Чтобы даже список значений еиму не был виден.
Может.. Visible


 
AM   (2002-10-03 17:00) [2]

>>>>>Чтобы даже список значений еиму не был виден.
>>Может.. Visible

Тут имелось ввиду, что какое конкретно на данный момент стоит значение нужно видеть и причем ясно и четко, а какие есть еще варианты - нет.
Может что-то на событие onDropDown... но как программно предотвратить выпадание списка...



 
Andrey007   (2002-10-03 17:38) [3]

>но как программно предотвратить выпадание списка

На событие OnDropDown вешаешь обработчик (Sender as TComboBox).DroppedDow:=False;
и вся недолгая


 
AM   (2002-10-03 17:53) [4]

Всеравно выпадает по крайней мере при свойстве
Style = csOwnerDrawFixed
остальных не проверял...
может надо ловить все ображения к ней такие как onClick, onDblClick... OnKeyDown и обнулять все сообщения отсылаемые этому компоненту.

как сделать при OnKeyDown я знаю
Key:= VK_OEM_CLEAR;
а как при работе с мышкой?


 
AM   (2002-10-03 18:08) [5]

Наконец нашел один вариант если кому интересно ловите:
procedure TForm17.ComboBox1Enter(Sender: TObject);
begin
ComboBox1.Enabled:= False;
end;

procedure TForm17.ComboBox1Exit(Sender: TObject);
begin
ComboBox1.Enabled:= True;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
4-45625
s.kaster
2002-08-26 20:52
2002.10.14
Список процессов в D6


14-45511
Neox
2002-09-17 18:16
2002.10.14
Графические утилиты


14-45553
Esu
2002-09-20 07:51
2002.10.14
Пришибли о расизме наконец...


14-45504
Darts
2002-09-16 19:14
2002.10.14
Стоимость Delphi


1-45363
netm
2002-10-06 03:26
2002.10.14
Как вставить link на интернет сайт?