Найти окно программы ксли запущен exe

[Человек_Борща]

Всем привет!
Возник вопрос, как найти окно другой программы, если запущен её(др. программы exe).

Хочу изменить заголовок, а как как его нет, то нужно его получить по hwnd окна, которое тоже надо найти. Из всего этого известно только что запущен exe программы.

Как искать?

[r9m]

тыц
На заметку: у одного процесса может быть очень много окон

[Человек_Борща]

Спасибо=)

Хм просто хочу задать имя окну которое принадлежит процессу, через CreateProcess это сделать можно?

И так, пошёл другим путём через CreateProcess в потоке:

var
SI:TstartupInfo
begin
...
        if Length(AppInfo.AppOtherCaption) > 0  then
        begin
        SI.lpTitle:= //это как я понял и есть заголовок
        end;

      CreateProcess(
        PChar(AppInfo.AppExe),
        PChar(AppInfo.AppParamStr), nil, nil,
        False, GetPriority(AppInfo.AppPriority), nil,
        PChar(ExtractFileDir(AppInfo.AppExe)), SI, PI);
      SetProcessAffinityMask(pi.hProcess, AppInfo.AppCPUAffinity);
      WaitForSingleObject(pi.hProcess, INFINITE);
      CloseHandle(pi.hProcess);
      CloseHandle(pi.hThread);

как туда передать текст из параметра AppOtherCaption структуры:

type
  {класс информации о программе}
  TAppInfo = record
    AppName: string; // Имя
    AppExe: string; // Полный путь до ехе
    AppParamStr: string; // Параметры закуска
    AppOtherCaption:string; //Заголовок другой.
    AppPriority: Integer; // Приоритет
    AppFirstStart: Integer; // Первый запуск через
    AppSecondStart: Integer; // Второй запуск через
    AppRestart: Integer;
    AppRestartInTime: TTime; // Перезапуск после ошибки
    AppStart: Boolean; // Стартовать после окея?
    AppCPUAffinity: Cardinal; // Запуск на ядре
    AppStartMin: Boolean; // Запуск свёрнутым
  end;
  PAppInfo = ^TAppInfo;