Shellexecute med parameter

uses
  ShellAPI;


function GetSystemDirectory: string;
begin
  SetLength(Result, MAX_PATH);
  Windows.GetSystemDirectory(PChar(Result), MAX_PATH);
  SetLength(Result, Pred(Pos(#0, Result)));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  s : String;
begin
  s := GetSystemDirectory;
  ShellExecute(0, 'open', pointer(s+'\rcimlby.exe'), '-LaunchRA', pointer(s), SW_SHOWNORMAL)
end;


Vil være et godt gæt

Jens B