ShellExecute_AndWait im Unterordner

[wolves232]

hallo,

erstmal danke
das mit den delphi tags kannte ich nicht, habs geändert.

ich weiß nicht wo mein fehler liegt

mein code ist :

Delphi-Quellcode:

    Pfad := ParamStr(0);
    delete(Pfad, length(Pfad)-21, length(Pfad));
    ShellExecute_AndWait(Pfad+'\Installationen\'+ListBoxInstallationen.Items[7], IntToStr(SW_HIDE));

delete befehl schneidet von ParamStr die .exe der anwendung ab.
mit einer showmessage steht da der Pfad mit der .bat datei am ende.

C:\Users\Jörg\Projekt1\Installationen\Installer.ba t

nur er führt die .bat datei nicht aus.

[DeddyH]

Versuch mal
ShellExecute_AndWait('cmd.exe', '/k "' + ExtractFilePath(ParamStr(0)) + 'Installationen\' + ListBoxInstallationen.Items[7] + '"');

[Dalai]

Zitat von wolves232:

delete befehl schneidet von ParamStr die .exe der anwendung ab.

Aua! Für so etwas gibt es (eine) entsprechende Funktion(en), wie du ja selber bereits in deinem OP schriebst: ExtractFilePath.

Zitat:

mit einer showmessage steht da der Pfad mit der .bat datei am ende.

C:\Users\Jörg\Projekt1\Installationen\Installer.ba t

Und diese Datei gibt es dort auch? Was sagt ein FileExists() zu diesem absoluten Pfad?

MfG Dalai

[wolves232]

Zitat:

Versuch mal
ShellExecute_AndWait('cmd.exe', '/k "' + ExtractFilePath(ParamStr(0)) + 'Installationen\' + ListBoxInstallationen.Items[7] + '"');

da öffnet sich nur die cmd im taskmanager aber es passiert nichts.
wenn ich die bat datei manuell ausführe funktioniert sie ja

code der bat datei :

@ECHO.
@Echo Installing Notepad++
@npp.6.2.2.Installer.exe /S

Zitat:

Und diese Datei gibt es dort auch? Was sagt ein FileExists() zu diesem absoluten Pfad?

Delphi-Quellcode:

  if CheckListBoxInstallieren.Checked[3] then
  begin
    if FileExists(ExtractFilePath(ParamStr(0)) + 'Installationen\' + ListBoxInstallationen.Items[7]) then
    begin
      ShellExecute_AndWait('cmd.exe', '/k "' + ExtractFilePath(ParamStr(0)) + 'Installationen\' + ListBoxInstallationen.Items[7] + '"');
      CheckListBoxInstallieren.Items[3] := ListBoxInstallationen.Items[6]+'     (installiert)';
    end;
  end;

FileExists lässt mich weiter

[DeddyH]

Zitat:

nShow := SW_HIDE;

Was passiert denn, wenn Du das mal in SW_SHOW änderst?

[wolves232]

Zitat:

Was passiert denn, wenn Du das mal in SW_SHOW änderst?

Installing Notepad++
Der Befehl "npp.6.2.2.Installer.exe" ist entweder falsch geschrieben oder
konnte nicht gefunden werden.

[DeddyH]

Siehste, da stimmt wohl der Pfad innerhalb der *.bat nicht bzw. Du bist im falschen Arbeitsverzeichnis.

[wolves232]

ich habe die bat datei und die npp.exe datei im unterordner vom installationsmanager

ich dachte wenn ich mit shellexecute die .bat datei ausführe ist er im unterordner.
aber er sucht die npp.exe im ordner dadrüber.

nun habe ich in der bat datei stehen :

Code:

@ECHO.
@Echo Installing Notepad++
@Installationen\npp.6.2.2.Installer.exe /S

jetzt klappt es

vielen vielen dank