перетаскивание формы???

← →
_PG_gaws (2003-04-21 15:58) [0]

Подскажите плиз, как сделать так, что бы при перетаскивании формы за заголовок ее позиция не изменялась

← →
Skier © (2003-04-21 16:06) [1]

WM_MOVING

← →
_PG_gaws (2003-04-21 16:24) [2]

Skier © примного благодарен, это как предыдущий, как я понял. Пасибо, 2 раза помог ....

← →
_PG_gaws (2003-04-21 16:58) [3]

не получается .... WM_MOVING это как , подробнее нельзя???

← →
Skier © (2003-04-21 17:06) [4]

TYourForm = class(...)
......
private
procedure WMSize(var Message: TMessage); message WM_MOVING;

procedure TYourForm.WMSize(var Message: TMessage);
begin
inherited;
PRect(Message.LParam)^.Left := Left;
PRect(Message.LParam)^.Top := Top;
PRect(Message.LParam)^.Right := Left + Width;
PRect(Message.LParam)^.Bottom := Top + Height;
end;

← →
Yanis © (2003-04-21 17:09) [5]

Это круто, спасибо за код.

← →
Skier © (2003-04-21 17:12) [6]

Shit...Некорректно...WMSize - нужно переименовать на WMMoving !

← →
_PG_gaws (2003-04-21 17:22) [7]

Skier © во круто, научи, где ты енто все вызнал :) И еще раз спасибо!

← →
Skier © (2003-04-21 17:25) [8]

>_PG_gaws

> Skier © во круто, научи, где ты енто все вызнал :)

Интуиция..."Игры разума" смотрел ? :)

← →
_PG_gaws (2003-04-21 17:28) [9]

> Интуиция..."Игры разума" смотрел ? :)
Нет не смотрел, но у меня еще один вопрос — — — в прошлом примере перхватить нажатие Максимайза получается, а как насчет двойного щелчка на заголовке....

← →
Skier © (2003-04-21 17:30) [10]

WM_NCLBUTTONDBLCLK

← →
_PG_gaws (2003-04-21 17:35) [11]

← →
_PG_gaws (2003-04-21 17:36) [12]

WM_NCLBUTTONDBLCLK пожалуйста подробней!!!!!!!!!!!!!!!

>_PG_gaws
Придётся мне вас, батенька, вежливо послать...Читайте Help по
WinAPI !

← →
_PG_gaws (2003-04-21 18:27) [14]

перетаскивание формы??? Найти похожие ветки