Как мне запустить внешнее приложение с 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;