Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.012 c