如何在Delphi中启动外部应用程序并获取新启动的应用程序的窗口句柄？

Question

  

可能重复：
  How do I get another application's window handle passed to Delphi via a mouse click.

好吧，我一直在用不同的方法来将外部应用程序的窗口句柄传递给delphi。有没有办法让我能够在我的delphi应用程序中打开带有记事本的文本文件（参见我使用过的代码）

    procedure TfrmTestTrans.btnOpenFileClick(Sender: TObject);
begin
  handleStartedApp := ShellExecute(frmTestTrans.Handle, nil, 'c:\windows\notepad.exe',
                        'c:\test.txt', nil, SW_SHOWMAXIMIZED);
end;

但是这并没有给我打开的test.txt记事本窗口的可用句柄。我需要启动一个应用程序并获得该应用程序的正确窗口句柄，以使我的delphi程序能够使用它。