Текущий архив: 2002.10.07;
Скачать: CL | DM;
Вниз
Перемещение окна за заголовок Найти похожие ветки
← →
France (2002-09-25 09:46) [0]Приветствую Всех! Подскажите, может это было где-то. Можно ли запретить перетаскивание окна за заголовок?
← →
Separator © (2002-09-25 09:55) [1]Убери заголовок, а потом нарисуй свой
← →
France (2002-09-25 09:57) [2]Это не подходит
← →
qube © (2002-09-25 10:02) [3]procedure TForm1.WMNCHitTest(var Msg: TWMNCHitTest);
begin
inherited;
if Msg.Result = htcaption then
Msg.Result := HTCLIENT;
end;
← →
qube © (2002-09-25 10:04) [4]Да, конечно, объявить надо
TForm1 = class
....
procedure WMNCHitTest(var Msg: TWMNCHitTest); message WM_NCHITTEST;
← →
France (2002-09-25 10:08) [5]Спасибо, сейчас попробую.
← →
тоже в тему (2002-09-25 10:10) [6]Если я убрал из формы заголовок, обрабатываю WM_NCHITTEST пока на форме ничего нет все замечательно. Если я на нее положу скажем TBavel то таскать за этот Bavel уже не получится. Мне придется наследоваться от TBavel для этой цели ?
← →
France (2002-09-25 10:14) [7]> qube © (25.09.02 10:04)
Все работает!
← →
тоже в тему (2002-09-25 10:15) [8]Sorry, уже разобрался (TApplicationEvents)
Страницы: 1 вся ветка
Текущий архив: 2002.10.07;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.027 c
