![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите скрыть программу спанели задач. [D6, Win2k]
AndrewInc © (2001-12-13 16:58:00)Пришлите пожалуйста код который скроет с панели задач мою программу, если возможно то научите программу вешать в System Tray.
Заранее благодарен.
andey (2001-12-13 22:35:00) [1]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.
Если включить коментарий, то получите очень интересное приложение. Оно не видно в TaskBar и на него нельзя переключиться по Alt-Tab, но когда приложение минимизируется оно остается на рабочем столе в виде свернутого заголовка (прямо как в старом добром Windows 3.11)
Желаю удачи!!!
Andrey (2001-12-13 20:22:00) [2]А конкретнее http://delphi.mastak.com/cgi-bin/faq.pl?look=1&id=988624981&n=15
Вадим (2001-12-13 18:42:00) [3]FAQ