Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
KANSoftWare

Спрятать Min и Max кнопки на форме

Delphi , Программа и Интерфейс , Заголовок формы

Спрятать Min и Max кнопки на форме


procedure TForm1.FormCreate(Sender: TObject); 
var 
  l: DWORD; 
begin 
  l := GetWindowLong(Self.Handle, GWL_STYLE); 
  l := l and not (WS_MINIMIZEBOX); 
  l := l and not (WS_MAXIMIZEBOX); 
  l := SetWindowLong(Self.Handle, GWL_STYLE, l); 
end;  

Программный код, предоставленный вами, - это процедура Delphi, которая выполняется при создании формы (событие FormCreate). Её цель - скрыть кнопки минимизации и максимизации на форме.

Вот что она делает:

  1. Она получает стиль окна формы с помощью функции GetWindowLong.
  2. Она очищает из полученного стиля окна флаги WS_MINIMIZEBOX (0x20000) и WS_MAXIMIZEBOX (0x10000).
  3. Затем она устанавливает модифицированный стиль окна обратно на форму с помощью функции SetWindowLong.

Эта процедура вызывается при создании формы, поэтому она будет скрыть кнопки минимизации и максимизации на форме сразу.

Альтернативное решение:

Если вы хотите достичь этого без прямого изменения стиля окна, можно использовать следующий альтернативный код:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.BorderStyle := bsNone;
end;

В этом случае установка BorderStyle в bsNone будет удалить все рамки и кнопки с формы, включая минимизацию и максимизацию. Однако стоит иметь в виду, что это подход менее гибок, чем прямое изменение стиля окна, потому что он полностью удаляет все рамки и кнопки, а не только конкретные, как в оригинальном коде.

Процедура TForm1.FormCreate(Sender: TObject) скрывает кнопки Min и Max на форме путем изменения стиля окна с помощью функции GetWindowLong и SetWindowLong.


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

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




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


:: Главная :: Заголовок формы ::


реклама


©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru

Время компиляции файла: 2024-11-30 11:42:55
2024-12-11 00:59:58/0.0032639503479004/1