Событие при перемещении формы

← →
Jimmy (2008-02-11 22:09) [0]

Подскажите, пожалуйста, какое событие возникает при изменении положения формы на экране.

← →
vegarulez © (2008-02-11 22:15) [1]

onPaint 100%

← →
Jimmy (2008-02-11 22:16) [2]

Когда тащу мышкой форму OnPaint не возникает

← →
Leonid Troyanovsky © (2008-02-11 22:17) [3]

> Jimmy (11.02.08 22:09)

> Подскажите, пожалуйста, какое событие возникает при изменении
> положения формы на экране.

Изменение изменению - рознь.

--
Regards, LVT.

← →
Jimmy (2008-02-11 22:19) [4]

Когда тащу мышкой форму

← →
ketmar © (2008-02-11 22:21) [5]

>[4] Jimmy (2008-02-11 22:19:00)
смотреть в сторону WM_MOVING

---
Understanding is not required. Only obedience.

unit main;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, AppEvnts, StdCtrls;

type
TForm1 = class(TForm)
ListBox1: TListBox;
private
procedure WMMove (var Message: TWMMove); message WM_MOVE;
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.WMMove(var Message: TWMMove);
begin
ListBox1.AddItem(Format("WM_MOVE (%.8x, %.8x)", [Message.XPos, message.YPos]), nil);
end;

end.

WM_MOVING
WM_MOVE
WM_WINDOWPOSCHANGING
WM_WINDOWPOSCHANGED

Событие при перемещении формы Найти похожие ветки