![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
свернуть модальную форму [D5]
Ray © (2006-06-04 23:02:00)Как сделать, чтобы при сворачивании модальной формы,
сворачивалась и главная?
И, соответственно, одновременно обе восстанавливались?
Dmitrij_K (2006-06-05 10:09:00) [1]
TForm1 = class(TForm)
private
Procedure WMSysCommand(var message: TWMSysCommand); message WM_SysCommand;
public
end;
{...}
procedure TForm1.WMSysCommand(var message: TWMSysCommand);
begin
If message.CmdType = SC_MINIMIZE then
Application.Minimize
else
Inherited;
end;