Delphi свернута ли программа?

[CAN-UKRAINE]

Прошу помощи. Нужно определить, свернуто ли сторонее приложение или нет. Есть список процессов, их PID и путь к ехе.

[Stilet]

свернуто ли сторонее приложение или нет

Именно свернуто? Не в трей, не скрыто а именно свернуто в кнопку на панели задач?

Есть список процессов, их PID и путь к ехе.

Теперь можешь поискать примеры с EnumThreadWindows, которая даст окна по "номеру" потока. Ну и... Даже не знаю что дальше, проверяй их состояние на скажем свернутость функцией IsIconic

[CAN-UKRAINE]

Именно свернуто. Пробовал через IsIconic, но получаю только handle процессов. А вот получить имя ехе никак не получается
Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 Window:hWnd;
 buffer: array [0..127] of char;
 begin
 ListBox1.Clear;
 Window:=GetWindow(Handle,GW_HWNDFIRST);

 while Window<>0 do
  begin
    if ( IsIconic(Window)=False) and
    IsWindowVisible(Window) and
    (GetWindow(Window,GW_OWNER)=0) and
    (GetWindowText(Window,buffer,sizeof(buffer))<>0)
    then
     begin
     GetWindowText(Window,buffer,sizeof(buffer));
     ListBox1.Items.Add(StrPas(buffer));
     //ListBox2.Items.Add(GetModuleName(GetClassLong(Window,GCL_HMODULE)));
     end;

    Window:=GetWindow(Window,GW_HWNDNEXT);
    end;

  ListBox1.ItemIndex:=0;
 end;

[Stilet]

но получаю только handle процессов.

Имя... ИМХО нужно использовать библиотеку PSApi.
И ести делать так как ты то после получения хендла окна нужно получить процесс, к которому окно относится через GetWindowThreadProcessId
А уже через него и имя процесса можно.

[CAN-UKRAINE]

Получилось! Спасиба огромное. Пошол немного другим путем:
Зная Handle свернутых процессов, через function TakeProcessID получил их PID. И в окончании сравниваю со своим списком процессов