Einzelnen Beitrag anzeigen

MCXSC
(Gast)

n/a Beiträge
 
#1

Externe Programme starten?!

  Alt 12. Jun 2004, 14:33
Hallo!

Ich will mir für meine Programmsammlung einen Autostarter programmieren.

Nach einem Klick auf einen Button soll dann das Programm starten.

Ich habe es mit folgendem Code hinbekommen:

Delphi-Quellcode:
procedure TForm1.SpeedButton1Click(Sender: TObject);
var data: pchar;
begin
data := (PChar('c:\programme\Winamp5.exe));
ShellExecute(Application.Handle,
'open', data, nil, nil, SW_SHOW);
end;
In diesem Beispiel leigt die Datei in c:\programme. Da ich diese jedoch auf CD brennen will, müsste ich c: durch das CD-Laufwerk ändern. Okay, würde gehen. Aber wenn die CD ein anderer in seinen Rechner einlegt, geht dies nicht, da der Laufwerksname ja oft anders ist.

Wie kann ich die EXE-Dateien starten, und zwar aus dem Ordner, indem auch die Autostart-Datei liegt. Das Programm müsste das Root-Verzeichniss (z.B. c:\) automatisch erkennen?

Bitte um Hilfe...
  Mit Zitat antworten Zitat