各位高手，Help me！！！小问题，白送分！！！(100分)

F

float

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-27

• #1

各位高手：
我是Delphi 的初学者，对API函数的用法不太了解。
请高手指教GetWindowRect()函数如何使用？其参数变量如何定义？
有关此函数的帮助太少。
希望大家给出详细讲解，最好举例子！！！
非常感谢！！！

 

T

tanglu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-27

• #2

你可以在你的机器里面查找一下mapi.hlp。
这个文件里面有详细的帮助。

 

郭

郭镇松

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-27

• #3

用一个空窗体，再放一个按钮，写 如下代码，运行后，点一下按钮，会发现窗体标题
显示窗体的左坐标，拖动一下窗体，再点一下按钮，数字就变，应该知道它的用处了吧。

procedure TForm1.Button1Click(Sender: TObject);
var
rect : TRect;
begin
GetWindowRect(form1.handle,rect);
Caption := IntToStr(rect.Left);

end;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-27

• #4

函数功能：该函数返回指定窗口的边框矩形的尺寸。该尺寸以相对于屏幕坐标左上角的
屏幕坐标给出。
函数原型：BOOL GetWindowRect（HWND hWnd，LPRECTlpRect）；
参数：
hWnd:窗口句柄。
lpRect：指向一个RECT结构的指针，该结构接收窗口的左上角和右下角的屏幕坐标。
返回值：如果函数成功，返回值为非零：如果函数失败，返回值为零。若想获得更多
错误信息，请调用GetLastError函数。

var
R: TRect;
begin
GetWindowRect(Form1.Handle, R);
ShowMessage(IntToStr(R.Top)); // 显示的结果和 Form1.Top 属性的值完全相同
end;

 

W

wangxd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-27

• #5

来晚了，就象前面所说的

 

F

float

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-27

• #6

多人接受答案了。