>>766
目的のウィンドウを探してGetWindowTextでミッションコンプリート。

>>767
プロシージャじゃなくてメソッドにする。
× procedure hoge; begin Button1.Caption := 'hage'; end;
○ procedure TForm1.hoge; begin Button1.Caption := 'hage'; end;