Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Показ и скрытие нескольких форм


leonidus ©   (2008-05-04 10:40:00) 

Господа, вопрос вроде детский но разобраться не смог. Есть две формы: Form1 - главная и Form4 - второстепенная так сказать :) По  клику на контроле на первой форме нужно показать вторую скрыв первую, делаю так:
  form4.show;
  form1.hide;

все хорошо, но вот Form4 при минимизации сворачивается не на панель задач, а на рабочий стол, как этого избежать?


leonidus   (2008-05-06 19:54:00) [1]

всем большое спасибо, проблема была решена следующим способом:

Procedure WMGetSysCommand(var Message :TMessage); message WM_SYSCOMMAND;

...

Procedure TForm4.WMGetSysCommand(var Message : TMessage) ;
Begin
iF (Message.wParam = SC_MINIMIZE) Then application.Minimize
else Inherited;
End;


Восхищенный   (2008-05-04 20:10:00) [2]

> 223001   (04.05.08 19:50) [3]

И че тогда будет?

Вот кусочек VCL:

procedure TCustomForm.Hide;
begin
 Visible := False;
end;

procedure TCustomForm.Show;
begin
 Visible := True;
 BringToFront;
end;

Удивись и больше не советуй людям то, чего сам не знаешь, ладно?

> leonidus   (04.05.08 10:40)

См. [1] и [2]. Application.Minimize поможет.


223001   (2008-05-04 19:50:00) [3]

напиши по другому form1.visible:=false; form4.visible:=true;


Anatoly Podgoretsky   (2008-05-04 13:39:00) [4]

> leonidus  (04.05.2008 10:40:00)  [0]

А куда еще сворачиваться подчиненым формам, у них же нет кнопки на панели задач.
Надо стиль окна менять, или сворачивать главное окно


@!!ex   (2008-05-04 11:13:00) [5]

Ловить событие минимизации, и там Application.Minimize;


Наверх

Титульная страница Поиск, карта сайта Написать письмо