![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Событие при перемещении формы [D6, XP]
Jimmy © (2008-02-11 22:09:00)Подскажите, пожалуйста, какое событие возникает при изменении положения формы на экране.
DVM (2008-02-11 22:36:00) [1]WM_MOVING
WM_MOVE
WM_WINDOWPOSCHANGING
WM_WINDOWPOSCHANGED
Игорь Шевченко (2008-02-11 22:34:00) [2]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.
ketmar (2008-02-11 22:21:00) [3]>[4] Jimmy (2008-02-11 22:19:00)
смотреть в сторону WM_MOVING
---
Understanding is not required. Only obedience.
Jimmy (2008-02-11 22:19:00) [4]Когда тащу мышкой форму
Leonid Troyanovsky (2008-02-11 22:17:00) [5]
> Jimmy (11.02.08 22:09)
> Подскажите, пожалуйста, какое событие возникает при изменении
> положения формы на экране.
Изменение изменению - рознь.
--
Regards, LVT.
Jimmy (2008-02-11 22:16:00) [6]Когда тащу мышкой форму OnPaint не возникает
vegarulez (2008-02-11 22:15:00) [7]onPaint 100%