VPF::Элементы заголовка формы - Форум программистов

NieL

Дата 15.12.2008, 13:16 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 214
Регистрация: 10.2.2008

Репутация: 1
Всего: 1

Столкнулся с проблемой. Нужно чтобы форма визуально имела вид как при bsDialog (в ее залоговке отсутствовал значок приложения и была только иконка закрытия формы) и при этом имеела место возможность резайзинга. Как такое можно сделать.

Alexeis

Дата 15.12.2008, 18:03 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Код


procedure TForm1.FormCreate(Sender: TObject);
var
  Style: Longint;
begin
 Style := GetWindowLong(Handle, GWL_STYLE);
 SetWindowLong(Handle, GWL_STYLE, Style and (not WS_MINIMIZEBOX) and (not WS_MAXIMIZEBOX) or WS_SIZEBOX);
end;

Иконку можно просто заменить на пустую.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Bose

Дата 15.12.2008, 19:42 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1458
Регистрация: 5.3.2005
Где: Riga, Latvia

Репутация: 23
Всего: 51

NieL, посмотри у формы свойство BorderIcons.

--------------------

Лучшее о Delphi за 2013 год. Подборка ссылок.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »