Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

не отрабатывает событие дабл клик для некоторых компонентов


Sakipiel ©   (2014-06-23 08:36:00) 


procedure TDesForm.DblClick(Sender: TObject);
begin
 if (Sender AS TControl).Name = 'FormPrototype' then
   AddComponent
 else
 begin
   TDesForm((Sender AS TControl).Owner).Events.AddEvent((Sender AS TControl),
     'OnClick', (Sender AS TControl).Name + 'OnClick');
   TDesForm((Sender AS TControl).Owner).AddProcInModule
     ((Sender AS TControl).Name + 'OnClick');
 end;
end;


пытаюсь такую процедуру назначить в событие даблклик добавляемых компонентов. В результате, у всех все работает, а Button и CheckBox в нее даже не заходят...., при том что назначение для всех компонентов происходит одинакого, в чем может быть беда? И заодно, чек бокс при онклике продолжает ставить и убирать галочку, как это отключить? Кстати ОнКлик у всех тоже назначенная мной процедура и она отрабатывает у всех в том числе и у батона и у чек бокса. Но галочка в моей процедуре никак не обрабатывается, а переставляться она все равно переставляется..


KilkennyCat   (2014-06-23 20:43:00) [1]


> Нужно менять логику интерфейса

точно. попадался мне как-то такой даблкликовый могоуровневый чекбокс.... убил бы.


Dennis I. Komarov   (2014-06-23 10:24:00) [2]

Нужно менять логику интерфейса


ВладОшин   (2014-06-23 10:04:00) [3]

назначайте им mousedown и тап проверяйте по времени м/д кликами


Ega23   (2014-06-23 10:01:00) [4]


> у всех все работает, а Button и CheckBox в нее даже не заходят


У TButton и TCheckBox нет события OnDblClick


Наверх

Титульная страница Поиск, карта сайта Написать письмо