![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Показ и скрытие нескольких форм
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;