|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Исчезновение при запуске
Как при запуске пограммы сделать так что бы ее форма стала невидимой или скрытой? В событиях OnShow и OnCreate вставлять типа Form1.Hide бесполезно.
|
#2
|
||||
|
||||
Код:
Apllication.ShowMainForm:=False; Код:
ShowWindow(Handle, SW_HIDE); Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#3
|
|||
|
|||
Не фурычит
|
#4
|
||||
|
||||
Код:
Visible:=False; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. Последний раз редактировалось The Shadow, 12.01.2008 в 13:10. |
#5
|
|||
|
|||
Неа. Не подходит.
|
#6
|
||||
|
||||
У меня сделано так:
В проекте Код:
begin Application.ShowMainForm:=False; ... ShowWindow(Application.Handle, SW_HIDE); end; Код:
procedure TForm1.FormCreate(Sender: TObject); begin Visible:=False; ... end; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#7
|
||||
|
||||
Есть интересная идея:
Код:
procedure TForm1.Timer1Timer(Sender: TObject); begin Form1.Visible := false; end; Но это примитивно и врядли подойдёт, зато РАБОТАЕТ А когда нужно восстановить форму: Код:
Timer1.Enabled := false; Form1.Visible := true; |
#8
|
||||
|
||||
Цитата:
Код:
procedure TForm1.FormPaint(Sender: TObject); begin Form1.Hide; end; P.S. Если ты не планируешь чё-то делать с формой в будущем - то не проще сделать консольное приложение ! Поживу - увижу, Доживу - узнаю, Выживу - учту. [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Последний раз редактировалось Yurk@, 12.01.2008 в 14:00. |
#9
|
||||
|
||||
Ещё проще:
Код:
AlphaBlend:=True; AlphaBlendValue:=0; Код:
ShowWindow(Application.Handle,SW_HIDE); |