![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сделать MainForm невидимым. [D6, Win2k]
Maxximusss © (2004-10-26 15:55:00)Мне необходимо исполнить программу без отображения MainForm. В программе используются визуальные компоненты, поэтому Console не катит.
Однако при выполнении MainForm.Hide ничего не происходит. Подскажите, в чем проблема.
Андерсон (2004-10-26 16:32: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.
вот те готовы пример
Maxximusss (2004-10-26 16:22:00) [2]Все, заработало.
Большое спасибо всем участвовавшим :)
Maxximusss (2004-10-26 16:19:00) [3]Visible:=false не работает.
А убить ее не проблема :)
Андерсон (2004-10-26 16:17:00) [4]Тогда попробуй в инспекторе объектов сделать в пункте
Visible = False
Плохиш (2004-10-26 16:14:00) [5]Application.ShowMainForm := false;
SlyFox (2004-10-26 16:10:00) [6]MainForm.Visible:=false; может?
Главное не забыть "убить" прогу потом. Ну, например:
Application.Terminate;
jack128 (2004-10-26 16:10:00) [7]Maxximusss (26.10.04 16:05) [6]
а OnCreate ничего и не должно работать.
Maxximusss (26.10.04 16:05) [6]
после Application.Runпосле Run твоя программа уже почти закончила работу..
А правельный оттвет те уже дали..
Maxximusss (2004-10-26 16:10:00) [8]Андерсон,
не работает это... Это равносильно MainForm.Hide.
Андерсон (2004-10-26 16:09:00) [9]попробуй так...
MainForm.Visible := False;
Maxximusss (2004-10-26 16:05:00) [10]Блин, понял вопрос.
Я пробовал это написать в TMAinForm.Create
потом в Project Source
после Application.Run
Gero (2004-10-26 16:04:00) [11]
> Maxximusss (26.10.04 16:03)
Класс!
MetalFan (2004-10-26 16:04:00) [12]
> В Дельфи :)
А Я то думал в коммандной строке!
HSolo (2004-10-26 16:03:00) [13]TApplication.ShowMainForm ?
Maxximusss (2004-10-26 16:03:00) [14]В смысле где? В Дельфи :)
jack128 (2004-10-26 16:00:00) [15]Maxximusss (26.10.04 15:55)
Однако при выполнении MainForm.Hide ничего не происходит. Подскажите, в чем проблема.
а где ты это пишешь???