Форум: "WinAPI";
Текущий архив: 2002.11.14;
Скачать: [xml.tar.bz2];
ВнизКак таскать окно. Найти похожие ветки
← →
_sMile (2002-10-04 11:30) [0]Как сделать на WinAPI так, чтобы пользователь мог таскать окно за любую его точку (окно без заголовка)?
← →
Игорь Шевченко (2002-10-04 11:31) [1]Обрабатывать WM_NCHITTEST, возвращая HTCAPTION
← →
_sMile (2002-10-04 11:44) [2]Не получается, можно пример?
← →
Игорь Шевченко (2002-10-04 11:47) [3]_sMile (04.10.02 11:44)
А можно пример того, что не получается ? :-)
← →
Termik (2002-10-04 11:54) [4]Зачем на WinApi ?!
Попробуй так:
procedure TForm1.MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
const
SC_DragMove = $F012; { a magic number }
begin
ReleaseCapture;
perform(WM_SysCommand, SC_DragMove, 0);
end;
← →
_sMile (2002-10-04 11:55) [5]Знаю такой способ:
procedure WMNCHitTest(var M: TWMNCHitTest); message wm_NCHitTest;
...
procedure TForm1.WMNCHitTest(var M: TWMNCHitTest);
begin
inherited;
if M.Result = htClient then
M.Result := htCaption;
end;
Но прога полностью на WinAPI, как поместить аналогичный код в обработчик сообщений окна?
← →
MBo (2002-10-04 12:01) [6]Если ты осознанно написал "прогe полностью на WinAPI", то вопрос с твоей стороны довольно странный
← →
_sMile (2002-10-04 12:05) [7]2 Termik:
C O O L
Всё прекрасно работает и код небольшой! =)
/ Всё гениальное - просто./
2 all:
Всем огромное спасибо!
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.11.14;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.009 c