example.pas

uses Process;

procedure RunFile(s:string);
var p:TProcess;
begin
  p := TProcess.Create(nil);
  with p do
    begin
      Executable := s;
      Execute;
      Free;
  end;
end;

procedure OpenTextWithNotepad(s:string);
var p:TProcess;
begin
  p := TProcess.Create(nil);
  with p do
    begin
      Executable := 'notepad.exe';
      Parameters.add(s);
      Execute;
      Free;
  end;
end;

begin
  RunFile('mspaint.exe');
  OpenTextWithNotepad('example.txt');
  readln();
end.