Скачать: CL | DM;

Событие OnDblClick для LookUpComboBox   Найти похожие ветки 

← →
PoetOfDelphi ©   (2006-02-16 14:09) [0]

Салют!
В инспекторе объектов это событие для LookUpComboBox*а не показано.
Но поскольку последний является потомком TControl, насколько я понимаю, такое событие у него должно быть. Как назначить ему обработчик?
Пробовал так:
TComboBox(LookUpComboBox).OnDblClick:=LookUpComboBoxOnDblClick.
Ни к чему не приводит...

---

← →
umbra ©   (2006-02-16 14:36) [1]

> TComboBox(LookUpComboBox)

а почему TComboBox? он с ТLookUpComboBox никак не связан.

---

← →
umbra ©   (2006-02-16 14:40) [2]

> TComboBox(LookUpComboBox)

а почему TComboBox? он с ТDBLookUpComboBox никак не связан.
а в принципе надо объявить наследника от ТDBLookUpComboBox и опубликовать у него свойство OnDblClick

---

← →
Ega23 ©   (2006-02-16 14:44) [3]

Непонятен один момент: а нафига у LookupCombo обрабатывать OnDblClick?

---

← →
umbra ©   (2006-02-16 14:52) [4]

Ega23 ©   (16.02.06 14:44) [3]

хозяин - барин. ну надо это человеку, что ж поделаешь. :)

---

← →
Ega23 ©   (2006-02-16 14:59) [5]

> хозяин - барин. ну надо это человеку, что ж поделаешь. :
> )


Да я понимаю. Просто мне фантазии не хватает - куда этот даблклик присобачить...

---

← →
PoetOfDelphi ©   (2006-02-16 15:20) [6]

>  в принципе надо объявить наследника от ТDBLookUpComboBox
> и опубликовать у него свойство OnDblClick

как?

---

← →
umbra ©   (2006-02-16 15:47) [7]

в принципе, сам код выглядит так:


unit MYdblookupCombo1;

interface

uses
 SysUtils, Classes, Controls, StdCtrls, dblookup;

type
 tMYdblookupCombo1 = class(TDBLookupCombo) //объявляем наследника
 published
   { Published declarations }
   property OnDblClick; //публикуем свойство
 end;

procedure Register;

implementation

procedure Register;
begin
 RegisterComponents("Samples", [tMYdblookupCombo1]);
end;

end.

чтобы новый компонент можно было поместить на форму, надо добавить его в палитру компонентов делфи. Как это сделать, написано в справке.

---

← →
PoetOfDelphi ©   (2006-02-17 16:49) [8]

> umbra ©   (16.02.06 15:47) [7]

Пасиба. Бум пробовать...:)

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c