Телефон: +7 (926) 245-03-63

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

Следующая статья: Прозрачный текст.

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

function ExecuteFile(const name_, Params, DefaultDir: string; ShowCmd: Integer): THandle;
var zname_, zParams, zDir: array[0..79] of Char;
begin
  Result:=ShellExecute(Application.MainForm.Handle, nil,
  StrPCopy(zname_, name_), StrPCopy(zParams, Params),
  StrPCopy(zDir, DefaultDir), ShowCmd);
end;

Примечание: Чтобы этот код заработал, необходимо добавить в uses модуль ShellAPI.