Изменить заголовок программы

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

Привет всем!
Как можно задать свой заголовок программе?
Я пробовал, через CreateProcces задавать но не работает.
Затеем нашёл вариант, надодить все видимые окна, и отсейвать их по принадлежнасти к процессам..
Но это тоже не самое лучшее...

может ещё есть вариант задать заголовок до старта программы?

Вот выкладываю программу которая умеет задавать заголовок программы после её старта.. Может кто поймет как так можно сделать..

[_Engine_]

Имеешь в виду Form.Caption?

[Nater]

SetWindowText(GetForegroundWindow, 'Text');

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

Я хочу задать заголовок другой программе, ещё до запуска... т.е. прописывашь строку и эта строка при запуске программы становиться заголовком программы..
HLSM так делает.. но как мне не понятно..
Nater - да это я знаю , но это не подходит.

[Stilet]

ещё до запуска

У-у-у Практически нереальные условия

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

Тогда как это делает программа которую я выложил в первом посту?

[Stilet]

Вот выкладываю программу которая умеет задавать заголовок программы после её старта

И что это? Сервер Халфлайф?

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

Нет, программа следящая за ними, но это не столь важно сколько её функция задания своего заголовка программы.
Работает и с другими программами=)

[dmitriegorovih]

Вруби таймер (если конечно известен заголовок программы)

procedure TForm1.Timer1Timer(Sender: TObject);
var
 WndHandle: HWND;
begin
 WndHandle := FindWindow(nil, '>>>Сюда пиши известный загаловок<<<');
   if WndHandle <> 0 then begin
   SetWindowText(WndHandle,'>>>Сюда пиши новый заголовок<<<');
   timer1.Enabled:=false;
   exit;
   end;
end;

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

нет заголовок заранее не известен..

Но твой вриант я уже пробовал.. путем поиска всех видимых окон определённого процесса... и после запуска изменять заголовок. но это тож не вариант. Ищу другие решения