在Kylix中模拟Windows API中的FindWindow函数[2]

  result := findwindow(qtdisplay,xdefaultscreen(qtdisplay),xdefaultrootwindow(qtdisplay),'kylix') <> 0;
{$endif}

{$ifdef win32}
   result := findwindow('tappbuilder', nil) <> 0;
{$endif}
end;