关于EnumWindowsr的问题

[cdchq]

写了一段代码，目的是寻找所有窗口中，窗口标题为"MYAPP"的窗口，如下
function EnumWindowsMYAPP(Handle:HWND;lParam:LPARAM):Boolean;stdcall;
var
Caption:array[0..254] of Char;
begin
if GetWindowText(Handle,Caption,SizeOf(Caption))<>0 then
begin
if (Caption='MYAPP') and (Handle<>FrmMain.Handle) then
if CreateAppHandleList.IndexOf(IntToStr(Handle))=-1 then
CreateAppHandleList.Add(IntToStr(Handle));
end;
Result:=True;
end;
CreateAppHandleList是一个TStringList全局变量
然后在程序开始时执行
procedure TFrmMain.FormCreate(Sender: TObject);
begin
CreateAppHandleList:=TStringList.Create;
EnumWindows(@EnumWindowsMYAPP,0);
end;

问题是：只开了一个MYAPP，但以上代码会得到两个MYAPP的句柄

[s11ss]

另一个是Application窗口,设置Application.Title:='abc'试试