ClientToScreen的问题(20分)

1

16cy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-11

• #1

帮助文件里明明有<br>BOOL ClientToScreen(<br> &nbsp; &nbsp;HWND hWnd, // window handle for source coordinates <br> &nbsp; &nbsp;LPPOINT lpPoint // address of structure containing coordinates &nbsp;<br> &nbsp; );<br>可是在使用时运编译通不过，好象delphi只认识<br>ClientToScreen（LPPOINT lpPoint ）；的用法

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-11

• #2

你看的是api函数，要引用windows单元：<br>procedure TForm1.Button1Click(Sender: TObject);<br>var P:Tpoint;<br>begin<br> &nbsp;P:=Point(0,0);<br> &nbsp;windows.ClientToScreen(Form1.Handle,P);<br>end;

 

1

16cy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-11

• #3

引用哪个单元？

 

1

16cy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-11

• #4

分给你了，但是用你的程序一样通不过编译<br>而且我要用的是别的窗口的句柄

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-11

• #5

procedure TForm1.Button1Click(Sender: TObject);<br>var P:Tpoint;<br>begin<br> &nbsp;P:=Point(0,0);<br> &nbsp;windows.ClientToScreen(Form2.Handle,P);<br>end;