如何得到鼠标的位置(0分)

H

holyszq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-26

• #1

在窗体中放一个控件,点击一个另外一个控件时它的位置在鼠的位置。

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-27

• #2

getcursorpos(p:TPoint)

 

G

goease

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-27

• #3

OK

 

H

holyszq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-27

• #4

不行呀！！！，能具体一点吗？谢谢！！！

 

K

kk2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-27

• #5

var
P:Tpoint;
begin
getcursorpos(P);
p.x//是横坐标
p,y//是众坐标
end;

 

E

Enigma0702

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-28

• #6

Screen.Cursor.X;
Screen.Cursor.Y;
如果我没有记错的话