VPF::Скрытие программы от панели задач

THandle

Дата 26.11.2007, 11:41 (ссылка)

(нет голосов)

Загрузка ...

Хранитель Клуба
Group Icon

Награды: 1

Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372

Для того чтобы скрыть программу от панели задач необходимо в TForm.OnCreate Поставить

Код


 SetWindowLong(Application.Handle, GWL_EXSTYLE, 
    GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);

Это сообщение отредактировал(а) THandle - 26.11.2007, 11:41

scream4ik

Дата 9.12.2007, 03:37 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 9.12.2007

Репутация: нет
Всего: нет

Чтобы юзер при запуске программы не видел главного окна. Выбери в меню: project>>>View source и ты увидишь:

Код


program Project1; 

uses 
Forms, 
Unit1 in 'Unit1.pas' {Form1}; 

{$R *.RES} 

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

Теперь допиши после "Application.CreateForm(TForm1, Form1);" строчку "Application.ShowMainForm:=false;". У тебя должно получиться:

Код


program Project1; 

uses 
Forms, 
Unit1 in 'Unit1.pas' {Form1}; 

{$R *.RES} 

begin 
Application.Initialize; 
Application.CreateForm(TForm1, Form1); 
Application.ShowMainForm:=false; 
Application.Run; 
end.

Alexeis

Дата 10.12.2007, 11:09 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459

scream4ik, это только в Delphi 2007.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Poseidon

Дата 3.5.2008, 18:39 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133

Alexeis, ты что? Всю жизнь ShowMainForm на Delphi 7 работало.

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

kemiisto

Дата 3.5.2008, 19:08 (ссылка)

(нет голосов)

Загрузка ...

Дикий Кот. =^.^=

Награды: 1

Профиль
Группа: Участник Клуба
Сообщений: 3292
Регистрация: 29.7.2007

Репутация: 2
Всего: 160

Poseidon, Alexeis, видимо, перепутал

Код

Application.ShowOnTaskBar

Код

Application.ShowMainForm

Свойство ShowOnTaskBar действительно появилось только в 2007...

Это сообщение отредактировал(а) kemiisto - 3.5.2008, 19:12

--------------------

XMPP-канал.

Unit testing isn't enough. You need static typing.

Пей, кури, пиши на си! smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »