Ich möchte in Delphi 5 durch ein Ereignis(Button-Click)eine *.bat Datei ausführen.Die *.bat Datei kann auch im gleichen Verzeichnis wie das Projekt stehen.
Wer kann helfen?
durch ein Ereignis(Button-Click)eine
*.bat Datei ausführen. Die *.bat Datei kann auch im gleichen
Verzeichnis wie das Projekt stehen.
Hi Ute,
erzeuge Dir den OnClick-Event-Handler zu dem betreffenden Button (per Doppelmausklick im Objektinspektor) und bestücke diesen mit folgendem Inhalt:
PROCEDURE TForm1.Button1Click(Sender: TObject);
VAR e: INTEGER;
begin
e := ShellExecute
(Handle,
NIL,
PCHAR('C:\PROGRAMME\COOLSTUFF\XXX.BAT'),
PCHAR(''),
NIL,
SW\_SHOW);
IF (e
Da die Funktion "ShellExecute" in der Unit "ShellAPI" wohnt, mußt Du die "USES"-Liste der betreffenden Formular-Unit (Du findest diese Liste ganz oben) um den Eintrag "ShellAPI" ergänzen.
Das "'C:\PROGRAMME\COOLSTUFF\XXX.BAT'" in dem obigen Code-Snippet ersetzt Du natürlich durch das, was Deiner Batch-Datei entspricht. Wenn sich Deine Batch-Datei im selben Verzeichnis wie die aufrufende Anwendung befindet, möchtest Du vielleicht lieber eine relative Pfadangabe verwenden. Das Verzeichnis der EXE-Datei einer Anwendung kannst Du mit "ExtractPath(Application.Name)" auslesen. Du schreibst dann also: "ExtractPath(Application.Name)+'XXX.BAT'".
Ich hoffe, ich konnte Dir helfen.
Mit freundlichem Gruß
Martin