Как установить минимальный размер окна?

Delphi , Программа и Интерфейс , Формы

Как установить минимальный размер окна?

Необходимо объявить обработчик события для WM_GETMINMAXINFO:

Code:

... 

        private 

        

        

        procedure WMGetMinMaxInfo(var Message : TWMGetMinMaxInfo); 

        message WM_GETMINMAXINFO; 

         

         

        А вот  как выглядит сам обработчик:

         

        procedure TForm1.WMGetMinMaxInfo(var Message : TWMGetMinMaxInfo); 

        begin 

        Message.MinMaxInfo^.ptMinTrackSize :=  Point(Width, Height); 

        Message.MinMaxInfo^.ptMaxTrackSize :=  Point(Width, Height); 

        end;

Взято из http://forum.sources.ru

Примечание от Vit:

Начиная с Дельфи 5 появилось удобное свойство Constrains - специально для ограничесния минимальных и максимальных размеров...

Статья Как установить минимальный размер окна? раздела Программа и Интерфейс Формы может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Формы ::

23.04.2024 11:05:12/0.0042190551757812/2