Форум: "Основная";
Текущий архив: 2003.10.30;
Скачать: [xml.tar.bz2];

Вниз

Как создать собственный заголовок?   Найти похожие ветки 

← →
Brutus   (2003-10-17 13:04) [0]

Подскажите, как создать собственный заголовок окна. Т.е. я устанавливаю borderstyle := bsnone и делаю заголовок, к примеру с помощью картинки. Но как сделать что бы картинка действовала как заголовок?

---

← →
Игорь Шевченко   (2003-10-17 13:11) [1]

Обрабатывать сообщение WM_NCHITTEST

procedure TMyForm.WMHCHitTest (var Message : TWMNCHitTest);
begin
if PtInRect (CaptionRect,
ScreenToClient(SmallPointToPoint(Message.Pos))) then
Message.Result := HTCAPTION
else
inherited;
end;

Где CaptionRect - прямоугольник твоей картинки

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.10.30;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c