![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Пишу прогу которая будет сидеть в трее, соответственно Form1(Она же MainForm) мне нужно скрыть как только загрузится программа...ну тоесть ее видно не должно быть вобще . В Object Inspector ставлю параметр Visible = False...
пробовал даже в коде прописывать Form1onCreate...(точно не помню как там) Form1.visible := false; \Form1.hide; ничего не помогает...всеравно висит на экране... ![]() ![]() |
#2
|
||||
|
||||
![]() Напиши
ShowWindow(Form1.Handle, SW_HIDE); {скрывает форму} ShowWindow(Application.Handle, SW_HIDE); {скрывает приложение с панели задач} |
#3
|
||||
|
||||
![]() Чтобы восстановить замени SW_HIDE на SW_RESTORE
|
#4
|
|||
|
|||
![]() Спасибо, все что вы написали - работает,... но только не при FormCreate
![]() Код:
procedure TForm1.FormCreate(Sender: TObject); begin ShowWindow(Form1.Handle, SW_HIDE); ![]() ![]() ![]() |
#5
|
||||
|
||||
![]() ShowWindow(Form1.Handle, SW_HIDE); не будет работать при создании формы. Читайте хэлп.
Это можно попробовать сделать в событии OnShow, должно корректно работать. THE CRACKER IS OUT THERE |
#6
|
|||
|
|||
![]() ![]() |
#7
|
|||
|
|||
![]() 1. Устанавливаем Raize Components;
2. Кидаем на форму TRzTrayIcon с вкладки Raize Widgets; 3. Наслаждаемся кликами по кнопке "свернуть". Если хотите, чтобы прога сворачивалась и по кнопке "закрыть", пишем в событии FormClose главного окна приложения: Код:
RzTrayIcon1.MinimizeApp; Action := caNone; |
#8
|
||||
|
||||
![]() Вот рабочий вариант:
Код:
program Project1; uses Forms,Windows, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Form1:=TForm1.Create(nil); Application.Run; while true do begin sleep(1000); Application.ProcessMessages; end; end. |
#9
|
|||
|
|||
![]() Вот ещё стандартный вариант.
Код:
program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.ShowMainForm:= false; Application.Run; end. |
#10
|
||||
|
||||
![]() Блин такая же проблема! При запуске форма не скрывается..
Може кто знает как все настройки в Deldhi 2007 вернут к изначальным? Раньше всё было хокей, а потом я чё-то накасячил и всё болты. Как настройки венуть??????????????? |
#11
|
||||
|
||||
![]() Как сменить настройки, вопрос хороший, смотря что накручено.
У меня была такая проблема форма не скрывалась не на Create не на Activate, и я если не ошибаюсь делал по таймеру, Enabled := true: и на минимальном интервале, скрывать форму, может не очень грамотно но работает, на тот момент я лучше не придумал, а потом больше не сталкивался с этим. |
#12
|
||||
|
||||
![]() Ещё мысль пришла.
AlphaBlend:= true: AlphaBlendValue := 0: В свойствах формы |
#13
|
||||
|
||||
![]() Цитата:
![]() |
#14
|
||||
|
||||
![]() AlexSku прав.
Не надо извращаться, Код:
Application.ShowMainForm:= false; прекрасно работает. THE CRACKER IS OUT THERE |
#15
|
||||
|
||||
![]() Ты хотел сказать не AlexSku, а я прав? Ты ошибся, это я сказал, что то что сказал AlexSku это извращение.
|