Как отследить и обработать событие на перемещение окна ?

← →
UnDISCOvery (2002-02-04 16:58) [0]

Вытекает из моего предыдущего вопроса...
Пользователь хватает окошко за заголовок и начинает его таскать.
Как отследить это событие ?
Как добраться до координат рамки которая появляется во время перетаскивания ?
Как сделать чтобы окошко не могло выходить за пределеы родительского компонента ?

← →
BlankAlex (2002-02-04 17:07) [1]

Я только два дня назад этим занимался.
Давай e-mail, скину

← →
BlankAlex (2002-02-04 17:28) [2]

для главного окна обрабатываешь WM_Move,
а для дочернего WM_Moving и WM_GetMinMaxInfo

← →
UnDISCOvery (2002-02-04 17:34) [3]

E-mail: egen_postbox@rambler.ru

← →
Ghost. (2002-02-04 17:50) [4]

type
TForm1 = class(TForm)
private
{ Private declarations }
public
procedure WMEXITSIZEMOVE(var Message: TMessage);
message WM_EXITSIZEMOVE;
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}
procedure TForm1.WMEXITSIZEMOVE(var Message: TMessage);
begin
Form1.Caption := "Finished Moving and sizing";
end;

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