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

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

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


ymin ©   (2002-04-09 12:21:00) 

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


ymin   (2002-04-09 14:00:00) [1]

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


Song   (2002-04-09 13:12:00) [2]

wsMaximized


Alx2   (2002-04-09 13:12:00) [3]


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;


ymin   (2002-04-09 12:39:00) [4]

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


Игорь Шевченко   (2002-04-09 12:26:00) [5]

День добрый,

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

С уважением,


Наверх

Титульная страница Поиск, карта сайта Написать письмо