Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Удаление с панели задач лишних окон


Alex_E ©   (2002-07-03 18:16:00) 

Как сделать, чтобы на панели задач ничего не появлялось при запуске программы?


dihlos   (2002-07-03 19:33:00) [1]

А этот код не покажет форму Form1 в таскбаре:


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);

Application.CreateForm(TForm1, Form1);
Application.Run;
end.


Экспериментируйте, сэр!;-)


dihlos   (2002-07-03 19:20:00) [2]

Но этот код скроет твою форму при запуске в таскбаре соответственно его не будет :)
Может пригодится для написания прог, что висят в трее.


dihlos   (2002-07-03 19:18:00) [3]

В файле *.dpr пишешь :

Application.Initialize;
Application.ShowMainForm:=False;
Application.CreateForm(TForm1, Form1);
Application.Run;


Fiend   (2002-07-03 18:19:00) [4]

Поиск по форуму


Наверх

Титульная страница Поиск, карта сайта Написать письмо