如何感知一个窗口的拖拽(移动)结束事件？(100分)

X

xywen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-29

• #1

当点住一个窗口标题栏拖拽(移动)结束时，如何感知这个事件的发生？

 

H

henrynj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-29

• #2

dragdrop 事件可感知

 

X

xywen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-29

• #3

我试了为什么不行？能不能请给出例程代码。
显示一个 ShowMessage('Ok'); 即可。

 

O

oldsheep35

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-29

• #4

Form的DragKind属性设为:dkDock
在OnEndDock中：
procedure TfrmSourceEdit.FormEndDock(Sender, Target: TObject; X,
Y: Integer);
begin
ShowMessage('OK');
end;

 

X

xywen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-29

• #5

谢谢