Вниз
Скачать: CL | DM;

TrayIcon   Найти похожие ветки 

 
nOvell   (2004-08-15 13:30) [0]

Создаю PopupMenu и цепляю его к BapTrayIcon. Ставлю Creatin Order и все такое.. Все показывается и выскакивает, но вот обработчики событий PopupMenu (выбор элементов) не срабатывают. Раньше KOL 1.90 все работало. Что бы это могло быть?


 
TRUF   (2004-08-15 19:38) [1]

Глюк новой версии КОЛ. Цитирую:

[-]MCK:  TKOLObj.CreationPriority  property  added, to provide
correct objects  creation  order  (TKOLMenu  objects  must  be  created
before TKOLTrayIcon, which can use TKOLPopupMenu).

И в честь этого конструктор TrayIcon после применения нового едитора (а может и сразу после рибилда проекта) изменяется на

Result.BAPTrayIcon1 := NewBAPTrayIcon(Applet); (В uses1_1.inc)

Он сует Applet при вызове Popup окна, а тот не держит события.

Меняем все обратно на Result.BAPTrayIcon1 := NewBAPTrayIcon(Result.Form); и все работает! Надо найти баг в сорсах кол - вечерком поковыряю.


 
TRUF   (2004-08-15 20:20) [2]

А нет это не в KOL, зря я на TKOLObj грешил. Это в мироре BatTrayIcon (у меня v1.05):

procedure TKOLBAPTrayIcon.SetupFirst;
begin
...
 SL.Add(Prefix + AName + " := NewBAPTrayIcon(Applet);");
...

Зачем?

Имхо надо SL.Add(Prefix + AName + " := NewBAPTrayIcon(" + AParent + ");");
И все рулит. Правим mckBAPTrayIcon.pas.



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

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



Память: 0.45 MB
Время: 0.29 c
14-1107501465
Guest__
2005-02-04 10:17
2005.02.27
Что с RSDN?


6-1103521635
Lex_!
2004-12-20 08:47
2005.02.27
Web-чат.


1-1108031675
Gek1
2005-02-10 13:34
2005.02.27
Помогите побороть ошибку! И как работает свойство FreeOnTerminate


14-1107704718
Aldor_
2005-02-06 18:45
2005.02.27
Измерить объективное расстояние между пикселами на экране


3-1105697007
mikel
2005-01-14 13:03
2005.02.27
Как узнать после INSERT присвоенный auto_increment ом ключ?




   Наверх