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

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 можно с помощью обработчика события WM_GETMINMAXINFO, объявляющегося в виде procedure WMGetMinMaxInfo(var Message : TWMGetMinMaxInfo);.

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

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

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

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

Время компиляции файла: 2024-12-22 20:14:06
2025-01-29 02:01:27/0.0026600360870361/0