![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Удаление с панели задач лишних окон
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]Поиск по форуму