![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запуск приложения - на TaskBar не выводить
Cossys © (2002-05-22 18:22:00)Чего-то я нигде не нашел (или под NT) не пашет. Пробую:
в процедуре onCreate
ShowWindow(Application.Handle, SW_HIDE);
и так не пашет:
ShowWindow(Handle, SW_HIDE);
и так..
ShowWindow(MainForm.Handle, SW_HIDE);
Появляется приложение все равно!
Sasha9 (2002-05-23 16:36:00) [1]2Cossys
нужно было писать
ShowWindow(Application.Handle, SW_HIDE);
не в OnCreate, а в OnShow
Cossys (2002-05-23 11:17:00) [2]to Xoy
Спасибо, все работает под NT, то, что надо!
Xoy (2002-05-23 05:54:00) [3]Внеся изменения в свой проект вы, получите приложение, которое не видно в TaskBar и на него нельзя переключиться по
Alt-Tab
program Project1;
uses
Forms,
Windows, {<---}
Unit1 in "Unit1.pas" {Form1};
{$R *.RES}
var {<---}
ExtendedStyle : integer; {<---}
begin
Application.Initialize;
{>}ExtendedStyle:=GetWindowLong(application.Handle, GWL_EXSTYLE);
{>}SetWindowLong(Application.Handle, GWL_EXSTYLE,
{>}ExtendedStyle or WS_EX_TOOLWINDOW {AND NOT WS_EX_APPWINDOW});
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
Под Win98 работает, под NT не пробовал.
ga3 (2002-05-23 01:34:00) [4]Можно просто в обжект инспекторе в св-вах главной формы указать WindowState:=WSMinimized, а на саму форму кинуть CoolTrayIcon с ввв.торри.нет она бесплатная. в ее своиствах прописать чтоб при минимизации сворачивалось в трей около часов системных. и тогда при запуске прога будет автоматически в систрей убираться и не захламлять панель задач. А к култрейикон приделай попапменю чтоб можно было развернуть если надо
Юрий Зотов (2002-05-22 23:33:00) [5]В том же обработчике OnCreate просто пишем:
Application.ShowMainForm := False;
И все.
Song (2002-05-22 19:35:00) [6]Понятно что в onCreate она не пашет, потому что в этот момент и форма и не видна и очередь сообщений не выполняется.