Минимизация в 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;

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

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