.exe Datei starten...

[Gratis-Zugangstool]

Hi,
ersteinmal möchte ich sagen, dass ich kein Programmierer bin und lediglich ein kleines Programm mit Delphi basteln möchte, das auch .exe Dateien starten können soll. Ich habe wirklich nicht viel Ahnung vom Programmieren. Daher habe ich mir von der Seite www.delphi-treff.de den Easy Delphi Helper heruntergeladen, der eine Befehlsübersicht besitzt.
Dort habe ich folgenden Befehl gefunden:

Delphi-Quellcode:

procedure ExecuteFile(const AFilename: String;
                      AParameter, ACurrentDir: String; AWait: Boolean);
var
  si : TStartupInfo;
  pi : TProcessInformation;
begin
  if Length(ACurrentDir) = 0 then begin
    ACurrentDir := ExtractFilePath(AFilename);
    if ACurrentDir[Length(ACurrentDir)] = '' then
      Delete(ACurrentDir, Length(ACurrentDir), 1);
  end;
  FillChar(si, SizeOf(si), 0);
  with si do begin
    cb := SizeOf(si);
    dwFlags := STARTF_USESHOWWINDOW;
    wShowWindow := SW_NORMAL;
  end;
  FillChar(pi, SizeOf(pi), 0);
  if Length(AParameter) = 0 then
    AParameter := Format('"%s"', [AFilename])
  else
    AParameter := Format('"%s" %s', [AFilename, AParameter]);
  if CreateProcess(Nil, PChar(AParameter), Nil, Nil, False,
                   CREATE_DEFAULT_ERROR_MODE or CREATE_NEW_CONSOLE or
                   NORMAL_PRIORITY_CLASS, Nil, PChar(ACurrentDir), si, pi) then
  begin
    try
      if AWait then WaitForSingleObject(pi.hProcess, INFINITE);
    finally
      CloseHandle(pi.hProcess);
      CloseHandle(pi.hThread);
    end;
  end;
end;

Ich habe das einfach in die Unit1 reinkopiert.

Ich möchte, dass wenn ich auf einen Button drücke, ein Programm gestartet wird.
Was muss ich bei diesem Button eingeben, um dies zu erreichen?

[edit=Luckie]Delphi-Tags ergänzt. Beim nächsten mal bitte sleber machen. Danke. Mfg, Luckie[/edit]