Как запустить другую программу

Для примера посмотрите в Delphi модуль FMXUTILS.PAS:

function ExecuteFile(const FileName, Params, DefaultDir: string;
                     ShowCmd: Integer): THandle;
var
  zFileName, zParams, zDir: array[0..79] of Char;
begin
  Result := ShellExecute(Application.MainForm.Handle, nil,
                         StrPCopy(zFileName, FileName), StrPCopy(zParams, Params),
                         StrPCopy(zDir, DefaultDir), ShowCmd);
end;
Пример вызова:

ExecuteFile('Notepad.exe', '', 'c:\windows', SW_SHOWNORMAL);
Примечание
Чтобы этот код заработал, необходимо добавить в uses модуль ShellAPI.