关于findwindow的问题

Question

lpclassname窗体类名，例如：TfrmMain

Answer 1

顾名思义，窗体的类名例如TForm1

Answer 2

var
  iRtn: HWND;
begin
hnd:= FindWindow('TfrmMain', '主窗体');

Answer 3

查找标题是 “aaa"的窗口var
h:HWND;
begin
h:=FindWindow('aaa',NULL);
end;

Answer 4

var
  iRtn: HWND;
begin
  ...
  iRtn:= FindWindow('TfrmMain', '主窗体'); 
  if iRtn = 0 then //没找到
  ...
end;

Answer 5

我下的API大全里头说:
函数型：HWND FindWindow（LPCTSTR IpClassName，LPCTSTR IpWindowName）;    参数：    IpClassName ：指向一个指定了类名的空结束字符串，或一个标识类名字符串的成员的指针。如果该参数为一个成员，则它必须为前次调用theGlobafAddAtom函数产生的全局成员。该成员为16位，必须位于IpClassName的低 16位，高位必须为 0。
能针对这个说明给我说说吗？谢谢

Answer 6

var
    wndHandle: HWnd;       wndHandle := FindWindow(nil, '记事精灵');
    if wndHandle <> 0 then
        showmessage('找到')
    else
        showmessage('没有找到');LPCTSTR IpClassName 给个Nil就可以了，如果你不知道要找的具体窗体类型。

Answer 7

接着errorcode(errorcode)　(2001-9-6 17:28:08) wndHandle := FindWindow(nil, '记事精灵');
    '记事精灵'是窗体的Caption