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

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

Changing a size of window [D6, Win2k]

Max2 ©   (2002-10-24 15:12:00) 

Как и где задать, что бы окно не могло изменять размер дальше введённых (длины и ширины окна)?

---

Lord Warlock   (2002-10-24 15:22:00) [1]

Коли так, посмотри текст VCL TWinControl

---

MBo   (2002-10-24 15:18:00) [2]

wm_getminmaxinfo

---

Max2   (2002-10-24 15:16:00) [3]

А где оно задаётся? У меня окно криэтится так:

procedure WinMain;
Begin
With WindowClass do
begin
Style := cs_DblClks;
lpfnWndProc := @WindowProc;
cbClsExtra := 0;
cbWndExtra := 0;
hInstance := 0;
hIcon := LoadIcon (0, idi_Application);
hCursor := LoadCursor (0, idc_Arrow);
hbrBackground := GetStockObject (NULL_BRUSH);
lpszMenuName := "";
lpszClassName := AppName;
end;
If RegisterClass (WindowClass) = 0 then
Halt (255);
Window := CreateWindow (AppName, "Cool",
ws_OverlappedWindow, 0, 0, 500, 500, 0, 0, HInstance, nil);
ShowWindow (Window, SW_SHOW);
UpdateWindow (Window);
while GetMessage (Mes, 0, 0, 0) do
begin
TranslateMessage (Mes);
DispatchMessage (Mes);
end;
Halt (Mes.wParam);
End;

---

Lord Warlock   (2002-10-24 15:14:00) [4]

Свойство Constrains формы

---

Наверх