Карта сайта 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.


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


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




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



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


реклама



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

Время компиляции файла: 2024-06-02 10:20:12
2024-07-13 07:18:45/0.007080078125/2