windows - 如何使用 Free Pascal/Lazarus 运行外部应用程序？

Question

如何使用 Free Pascal/Lazarus（使用 Windows）运行外部应用程序？我找到了“官方”参考页面，其中包含几个实现和示例。虽然我确信它适用于很多人，但以我目前的知识水平，我有些失落（我还没有太多使用 Free Pascal 进行常规编程，而且我在网上找到的其他示例不适用于我）。

是否有一个“清晰”的例子可以帮助我完成“第一步”？谢谢。

Answer 1

如果您不需要管道，您可以使用执行过程。

uses sysutils;
begin
  executeprocess('notepad.exe',['document.txt']);
end.

Answer 2

这是一个使用TProcess的工作示例（源）：

uses Process;
var
  RunProgram: TProcess;
begin
  RunProgram := TProcess.Create(nil);
  RunProgram.CommandLine := ‘Path and Name of Program’;
  RunProgram.Execute;
  RunProgram.Free;
end;

例如，这将打开应用程序“MS Notepad”：

uses Process;
var
  RunProgram: TProcess;
begin
  RunProgram := TProcess.Create(nil);
  RunProgram.CommandLine := ‘notepad.exe’;
  RunProgram.Execute;
  RunProgram.Free;
end;