Текущий архив: 2003.10.30;
Скачать: CL | DM;
Вниз
Как создать собственный заголовок? Найти похожие ветки
← →
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;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.023 c
