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

Минимизация в Tray ри старте с Windows   Найти похожие ветки 

← →
Application   (2004-01-20 17:39) [0]

Сновая я со своими глупыми вопросами :) Простите уж...

Теперь возникла такая проблема. Я использую компонет CoolTrayIcon и столкнулся с такой проблемой - не могу сделать так, что бы программа запускаясь вместе с операционкой изначально в трее. Автозапуск я сделал, но программа запускается развернутой. Я в OnCreate добавил что бы она минимизировалась, она минимизируется в трей, но в таскбаре всеравно отображается... :( Как это исправить?

---

← →
DeadMeat ©   (2004-01-20 18:12) [1]

> Я в OnCreate добавил что бы она минимизировалась
А как добавил? В смысле, что добавил?

---

← →
Serge ©   (2004-01-20 18:15) [2]


Var
 ExtendedStyle: Integer;

Begin
 Application.Initialize;
 ExtendedStyle := GetWindowLong(Application.Handle, GWL_EXSTYLE);
 SetWindowLong(Application.Handle, GWL_EXSTYLE, (ExtendedStyle And Not (WS_CAPTION)) Or
WS_EX_TOOLWINDOW And Not WS_EX_APPWINDOW);
 Application.CreateForm(TForm1, Form1);
 Application.Run;


---

← →
Serge ©   (2004-01-20 18:18) [3]

Насчет  "And Not (WS_CAPTION)" - это по усмотрению

---

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

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



Память: 0.45 MB
Время: 0.023 c