Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите пожалуйста [D6, Win2k]

HDD © (2002-02-17 13:33:00)
Как сделать чтобы форма была не видна на экране сразу при загрузке!
Form1.hide and Form1.visible:=false
Не помогает подскажите что-нибудь!

VID (2002-02-17 19:47:00) [1]
Сначала пишешь процедуру:

Procedure TForm1.HideMainForm;
VAR WNHND:INTEGER;
begin
//Закидываем форму очень далеко :)
Form1.Left := 10000;
Form1.top := 10000;
Application.ShowMainForm := false;
ShowWindow(Application.Handle, SW_HIDE);
// скрываем с панели задач
WnHnd := GetWindowLong(Application.Handle, GWL_EXSTYLE);
WnHnd := WnHnd or WS_EX_TOOLWINDOW;
SetWindowLong(Application.Handle, GWL_EXSTYLE, WnHnd);
end;

А на событие onCreate главной формы (предполагается что это form1) пишешь:

HIDEMAINFORM;

и все дела :)

HDD (2002-02-17 14:23:00) [2]
И всё равно она запускается!
Я даже поставил MainForm

xpyctuk (2002-02-17 14:04:00) [3]
зайдешь в project -> View source
и там перед
Application.Run
напишешь Application.ShowMainForm:=False;

HDD (2002-02-17 14:01:00) [4]
Подскажите не разумному что такое classid

[NIKEL] (2002-02-17 13:51:00) [5]
проще некуда :)
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->ShowMainForm = false;
Application->Run();

и всё будет шиколадно :)

HDD (2002-02-17 13:46:00) [6]
Видимой она мне вообще не нужна. Она в трее сидит! А там от неё уже форма открывается 2

xpyctuk (2002-02-17 13:44:00) [7]
а зачем тебе это надо?
и при каком событии тебе надо её сделать видимой?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »