DisplaySwitch über ShellExecute oder WinExec funktioniert nicht

[hoika]

Hallo,
%SystemRoot%\SysNative\DisplaySwitch.exe

unter 32bit immer noch
file not found

[Dalai]

Naja, die Umgebungsvariable(n) musst du vorher wahrscheinlich schon auflösen (ExpandEnvironmentStrings).

Grüße
Dalai

[martinwk]

Besten Dank für die vielen Tipps. Es funktioniert jetzt!
Aber nur in der folgenden Form, als 64-bit Programm compiliert:
ShellExecute(Handle, 'open', PChar('DisplaySwitch.exe'), PChar('/external'), nil, SW_HIDE);
Es funktioniert nicht mit der Pfadangabe: %SystemRoot%\SysNative\DisplaySwitch.exe, auch nicht, wenn ich DisplaySwitch über eine Batch-Datei aufrufe.

[Dalai]

Also eine Batchdatei wie

Code:

@echo off
set DS=%SystemRoot%\System32\DisplaySwitch.exe
if exist %SystemRoot%\SysNative\*.exe set DS=%SystemRoot%\SysNative\DisplaySwitch.exe
"%DS%"

funktioniert garantiert.

Und wie gesagt: Umgebungsvariablen müssen sehr wahrscheinlich schon aufgelöst an ShellExecute(Ex) übergeben werden. Die CMD macht das selbst und daher funktioniert das dort ohne weitere Maßnahmen. Alternativ zu ExpandEnvironmentStrings kann man auch GetWindowsDirectory benutzen, und den restlichen Pfad 'SysNative\DisplaySwitch.exe' anhängen; neuere Delphis haben das wahrscheinlich schon in der Klasse TPath oder sowas.

Grüße
Dalai

[himitsu]

Man könnte auch ganz böse C:\Windows hart einprogrammieren.

Als "Bugfix" für schrottige Programme, mit hartcodierten Pfaden, von saudämlichen Programmierern, heißt die Systempartition schon seit Jahren immer C:\ und das Windows-Rootverzeichnis immer Windows, also C:\Windows wird sich nie verändern. :stipid: (mindestens die nächsten Jahrzehnte)