Shellexecute Stringvariabel anstatt stattische Dateiangabe

[Jessa]

Schon wieder ich...

Ich hab nun immer noch ein Problem, das Programm was ich schreibe fügt nämlich mithilfe von String addieren ein eigendne Pfad sowie Ortsangabe zusammen.

Auf Deutsch muss ich ins ShellExecute nun einen String benutzen wenn es so laufen soll wie ich es will und nicht eine Eingabe wie 'c:\windows\datei.exe'.

Nur kommt dann immer der Fehler Inkompatible Typen: 'String' und 'PAnsiChar'.

Statische Möglichkeit

Delphi-Quellcode:

ShellExecute(Handle, 'open', 'c:\windows\datei.exe', nil, nil, SW_SHOWNORMAL);

Doch ich möchte die Dynamische Variante und mit z (string) diesen Pfad verwenden, dabei ist z.b. z := 'c:\windows\system32\notepad.exe';.

Delphi-Quellcode:

ShellExecute(Handle, 'open', z, nil, nil, SW_SHOWNORMAL);

Weiß wer weiter wie ich dieses Problem löse?

[Hawkeye219]

Hallo Jessa,

Ein TypeCasting sollte hier helfen:

Delphi-Quellcode:

ShellExecute(Handle, 'open', PChar(z), nil, nil, SW_SHOWNORMAL);

Gruß Hawkeye

[Jessa]

Oh danke, das war ein guter Weg. Nun wie ist es denn mit Programmen mit Konsolenbefehlen?

"net start dienstname" z.b. wenn man ihn in der Konsole (CMD) aufruft? Leider klappt es bisher nicht.

[nat]

dann mußt du den 4. parameter auch verwenden (der bei dir nil is).
der gib die parameter an. der 3. parameter gibt nur das zu startende file an.

du müsstest also

Delphi-Quellcode:

ShellExecute(0, 'open', 'net', 'user', nil, SW_SHOW);

bzw. wenn du auch was sehen willst

Delphi-Quellcode:

ShellExecute(0, 'open', 'cmd', ' /k net user', nil, SW_SHOW);

machen

[Jessa]

Nun der Befehl funktioniert und die gewünschte Funktion auch nur mit folgenden Problemen:

1. Es öffnen sich 2 Konsolen, eine führt den Befehl aus die andere sagt das es schon ausgeführt wird.

2. Wie kann ich Shellexecute veranlassen darauf die cmd (Konsole) wieder zu schließen?

[ManuMF]

Hallo,

zu 2.: Mit dem Parameter /C (zu den anderen).

Gruß,
ManuMF