[/7y3uK]

Вот, к примеру, если в SDK класс описан, то окно можно отыскать:

procedure TForm1.Button1Click(Sender: TObject);
var
H : HWND; // ссылка на окно
begin
H := FindWindow ('TForm1', 'Form1'); // ищем окно, (класс окна, caption окна)
If H <> 0 then ShowMessage ('Есть Form1!') // окно найдено
else ShowMessage ('Нет Form1!') // окно не найдено
end;