[NIch]

Как то так...
Нужно по имени окна найти его Handle...

Код:

 Handle := FindWindow(nil, 'Безымянный - Блокнот');

Пример: как, имея HANDLE окна, добавить запись в EditBox, находящемуся в этом окне?
Ответ

Код:

function ChangeWndFirstEditText(Wnd: HWND; const Text: string):
  boolean;
var
  EditWnd: HWND;
begin
  Result := False;
  EditWnd := FindWindowEx(Wnd, 0, 'EDIT', nil);
  if EditWnd = 0 then
    exit; //эдит не найден
  Result := SendMessage(EditWnd, WM_SETTEXT, 0, Integer(PChar(Text))) <> 0;
end;

Материал взят из базы программы DelphiWorld 6
Дальше нужно думать и экспериментировать...