用ShellExecute打开记事本后，如何保存后再执行下一行DELPHI代码

begin
  
    ShellExecute(Handle,'Open',PChar( 'notepad.exe'),PChar('c:\remark.txt'),nil,SW_SHOWNORMAL);     ShellExecute(Handle,'Open',P