Аналог ShowWindow(handle, sw_hide)

[WhatO_o?!]

Сообщение от DIONISKA

Скачал я ваш Aion, дабы проверить всё, и у меня плохие новости

SetWindowPos(handle,0,0,0,0,0,SWP_HIDEWINDOW or SWP_NOSIZE or SWP_NOZORDER);

без проблем скрыло окно отовсюду, однако искал хэндл окна я малость по-другому

...
var mylist  :tstrings;
...
procedure getwinhandlelist(var alist: tstrings;const maxi:integer);
var
 vis          :boolean;
 wnd          :hwnd;
 i            :integer;
begin
i:=0;
if not(assigned(alist)) then alist:=tstringlist.Create;
wnd := GetWindow(application.handle, gw_hwndfirst);
while wnd <> 0 do
   begin
   vis:=IsWindowVisible(wnd);   {Vis:=true; если нужно учитывать невидимые окна}
   if (vis) and (GetWindow(wnd, gw_owner) = 0) then
     begin
       alist.Add(inttostr(wnd));
       inc(i);
       if i>maxi then break;
       if i mod 2=0 then application.ProcessMessages;
     end;
   wnd := GetWindow(wnd, gw_hwndnext);
   end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  mylist:=tstringlist.Create;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  mylist.free;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
    I       : Integer;
    buff    : array [0..127] of char;
    s      :string;
begin
mylist.clear;
getwinhandlelist(mylist,2000); {2000 здесь максимальное число итераций для предотвращения зацикливания}
{в итоге в mylist будут хэндлы всех видимых окон}
{не стоит забывать что скрывать Programm Manager не стоит}
for I := 0 to mylist.Count-1 do
begin
 fillchar( buff, SizeOf(buff),#0);
 GetWindowText(strtoint(mylist[i]), buff, SizeOf(buff));
 s:=buff;
{... тут уже проводить проверки и неугодные окна скрывать}
 if pos('AION client',s)<>0 then SetWindowPos(strtoint(mylist[i]),0,0,0,0,0,SWP_HIDEWINDOW or SWP_NOSIZE or SWP_NOZORDER);
{окно клиента игры имеет заголовок "AION client" его мы и скроем}
end;

Ого! Спасибо огромное!

зы: но способ не спас, едва запускаю программу - пишет детектед читед программ только как он определяет не пойму... программа же висит в фоне, и никого не трогает...

[WhatO_o?!]

Понято, нельзя в программном коде упоминать "AION Client"... с инишником проканало! Всем спасибо!