Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.21;
Скачать: CL | DM;

Вниз

Спрятать приложение из TaskBar а   Найти похожие ветки 

 
Осирис ©   (2002-11-11 17:42) [0]

Пробовал так:

ShowWindow(Application.Handle,SW_HIDE);

Не помогает. Что посоветуете ?


 
Anatoly Podgoretsky ©   (2002-11-11 17:44) [1]

Советую прятать не приложение, а главнцю форму


 
Marcus   (2002-11-11 17:44) [2]

Application.Initialize;
Application.ShowMainForm := false;
Application.Run;


 
Осирис ©   (2002-11-11 18:02) [3]

>> Application.ShowMainForm := false;

Не совсем то. Мне не нужно прятать форму, я хочу лишь убрать ее из TaskBar"а. Я поместил иконку в Tray и теперь хочу, чтобы приложение не висело в панели задач.


 
iNew ©   (2002-11-11 18:10) [4]

ShowWindow(Application.Handle,SW_HIDE);
Только что попробовал работает.


 
Осирис ©   (2002-11-11 18:14) [5]

Создал новое приложение. Пустое приложение. В onCreate формы поместил следующую строку:
ShowWindow(Application.Handle,SW_HIDE);

В TaskBar (это та полосочка внизу экрана, на которой отображаются все запущенные приложения - я ничего не путаю ?) висит Project1.

В чем может быть дело ?

Delphi7, Win2000 Server (SP2)


 
iNew ©   (2002-11-11 18:24) [6]

А ты попробуй в OnActivate или в OnShow.


 
LongIsland ©   (2002-11-11 18:46) [7]


> Осирис © (11.11.02 18:14)

Причем тут OnCreate? Это пишется в dpr


 
Осирис ©   (2002-11-11 18:54) [8]

>> А ты попробуй в OnActivate или в OnShow.

Да. Действительно - ты прав.

>> Причем тут OnCreate? Это пишется в dpr

Ты уверен. Пробовал - не работает.


 
LongIsland ©   (2002-11-11 18:57) [9]

program Project1;

uses
Forms,
Windows,
Unit1 in "Unit1.pas" {Form1};

{$R *.res}

var
WnHnd : Integer;
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
WnHnd := GetWindowLong(Application.Handle, GWL_EXSTYLE);
if (WnHnd and WS_EX_TOOLWINDOW) = WS_EX_TOOLWINDOW then
WnHnd := WnHnd - WS_EX_TOOLWINDOW
else
WnHnd := WnHnd or WS_EX_TOOLWINDOW;
Application.MainForm.Hide;
SetWindowLong(Application.Handle, GWL_EXSTYLE, WnHnd);
Application.MainForm.Show;

Application.Run;
end.


 
Осирис ©   (2002-11-11 19:01) [10]

Спасибо. Полезная информация. Учту на будущее.


 
Song ©   (2002-11-11 20:53) [11]

>>В onCreate формы поместил следующую строку
В onCreate видимого окна ещё нет, чего ShowWindow() тебе будет скрывать?



Страницы: 1 вся ветка

Текущий архив: 2002.11.21;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.017 c
1-69358
Guest2
2002-11-12 19:45
2002.11.21
Как проверить завершение процесса из своей проги?


7-69589
XED
2002-09-20 12:45
2002.11.21
Как склеить 2 exe файла!


4-69630
vidiv
2002-10-10 09:23
2002.11.21
SelectDirectory( Caption , ?????? ,dir); - ??????? - Для сети


6-69474
megatrend
2002-08-30 18:37
2002.11.21
need help : Программа, написанная на Delphi5,


1-69369
ec
2002-11-08 20:29
2002.11.21
аналог TStringList