关于拖拽(50分)

W

whhak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #1

怎么能拖拽窗体的任意一部分就能使窗体移动？？

 

Z

zkmltyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #2

关注这个问题。

 

W

whhak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #3

没人知道？？

 

W

whhak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #4

顶

 

Y

ysai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #5

http://www.delphibbs.com/delphibbs/dispq.asp?lid=162574

 

Z

zw84611

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #6

老问题了。

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
SendMessage(handle,wm_SysCommand,$F012,0);
end;

 

W

whhak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #7

多人接受答案了。