这一段代码有何错误(10分)

S

sy0116

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-20

• #1

var
hwnd,h:longint;
txt:string;
begin
txt:=edit2.text;
hwnd:=FindWindow(nil,pchar(txt+' - 发送消息'));

 

H

henrynj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-20

• #2

函数功能：该函数获得一个顶层窗口的句柄，该窗口的类名和窗口名与给定的字符串相匹配。这个函数不查找子窗口。在查找时不区分大小写。
函数型：HWND FindWindow（LPCTSTR IpClassName，LPCTSTR IpWindowName）;
参数：
IpClassName ：指向一个指定了类名的空结束字符串，或一个标识类名字符串的成员的指针。如果该参数为一个成员，则它必须为前次调用theGlobafAddAtom函数产生的全局成员。该成员为16位，必须位于IpClassName的低 16位，高位必须为 0。
IpWindowName：指向一个指定了窗口名（窗口标题）的空结束字符串。如果该参数为空，则为所有窗口全匹配。
返回值：如果函数成功，返回值为具有指定类名和窗口名的窗口句柄；如果函数失败，返回值为NULL。
如：
findwindow('TForm1',nil);

 

P

pascal2x

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-20

• #3

FindWindow()的返回类型不对

 

A

archonwang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-20

• #4

同2楼上，findwindow()返回类型问题

 

H

henrynj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-20

• #5

toascal2x
不要误导好不好
HWND就是longint型的
HWND = type LongWord;
{$EXTERNALSYM FindWindow}
function FindWindow(lpClassName, lpWindowName: PChar): HWND;
stdcall;

 

J

jiangzixu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-20

• #6

这段代码没有任何错误！！！
var
hwnd,h:longint;
txt:string;
begin
txt:=edit1.text;
hwnd:=FindWindow(nil,pchar(txt));
//
SendMessage(hwnd, WM_Close, 0, 0);
end;
比如上面就能正常关闭窗体！
不知道你说的错是什么错？

 

刘

刘麻子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-23

• #7

这里，和返回类型没有关系，都是4字节变量