А как сделать, чтобы форма была или на весь экран или Minimize?

← →
ymin © (2002-04-09 12:21) [0]

А как сделать, чтобы форма была или на весь экран или Minimize?
и никак иначе
т.е. чтобы с масштабированием не мучаться

← →
Игорь Шевченко © (2002-04-09 12:26) [1]

День добрый,

Обрабатывать WM_SYSCOMMAND c параметром SC_RESTORE ?

С уважением,

← →
ymin © (2002-04-09 12:39) [2]

Я между прочим не ругался, а по-доброму... :))
А теперь можно на пальцах?

← →
Song © (2002-04-09 13:12) [3]

wsMaximized

TForm1 = Class(TForm) ............. public Procedure OnsysCommand(Var Message: TWMSysCommand); Message WM_SYSCOMMAND; End; Procedure TForm1.OnsysCommand(Var Message: TWMSysCommand); Begin If (WindowState = wsMaximized) And (Message.CmdType And SC_RESTORE = SC_RESTORE) Then Message.Result := 0 Else Inherited; End;

Сенька, бери мяч
(т.е. Thank you very much)

А как сделать, чтобы форма была или на весь экран или Minimize? Найти похожие ветки