Изменение стандартной формы

Вас наверное часто удивляла форма окна, которая появляется при загрузке Norton Utilites и других подобных программ. Она имела не прямоугольный размер и ВЫ задавались вопросом : как получить такую форму?

Хотя я подозреваю, что это обычный Bitmap/ Оказывается сделать это довольно просто. При этом Ваша форма может иметь самые замысловатые очертания т.к. все это задается с помощью полигона.

Все делается с помощью одной единственной процедуры :

SetWindowRgn(Handle, R, True);

Handle - указатель на форму, вид которой хотим поменятьR - указатель на регионТретий параметр - флаг, при значении TRUE сразу после установки перерисовка

Для установки R смотрите функцию CreatePolygonRgn

.

В примере я задал в качестве региона простой треугольник, но при большей изобретательности можно создавать очень интересные варианты. Например форму-круг или эллипс.

Прозрачная форма

Другое по теме:

• Создание в Delphi непрямоугольной формы с картинкой
• Прогулка по окнам Windows
• Статьи. Действия с посторонними окнами