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

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

Как заставить окно минимизироваться на месте, а не над пан. задач [D5, WinXP]

SerKom ©   (2005-03-11 06:45:00) 

Как заставить окно минимизироваться на месте, а не над панелью задач, когда на кнопку "Свернуть" нажимаешь?

---

DiamondShark   (2005-03-11 11:53:00) [1]

> _1   (11.03.05 11:34) [2]

Иногда лучше жевать...

---

_1   (2005-03-11 11:34:00) [2]

uses
 Windows, Messages;

type
 TForm = class(TForm)
 private
   { Private declarations }
 procedure OnSysCommand(var Msg: TWMSysCommand); Message WM_SYSCOMMAND;
 public
   { Public declarations }
 end;

var
 Form: TForm;

implementation

{$R *.dfm}
procedure TForm.OnSysCommand(var Msg: TWMSysCommand);
begin
 if Msg.CmdType = SC_MINIMIZE then
   Application.Minimize
 else
   inherited;
end;

end.

---

SerKom   (2005-03-11 07:00:00) [3]

Я имею ввиду не главные окна (в SDI-интерфейсе)?

---

Наверх