Programme im Kompatibilitätsmodus ausführen!

[Bomberbb]

Hallo,

gibt es eine Möglichkeit fremde Programme von Delphi aus im Kompatibilitätsmodus zu starten?

[Fridolin Walther]

Der einzige mir bekannte Weg ist die gewünschten Settings in HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers bzw. HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers zu setzen und die Applikation dann zu starten.

[nicodex]

Setze vorher die Umgebungsvariable __COMPAT_LAYER.
Siehe http://www.microsoft.com/windowsxp/u.../layertip.mspx

Mit Hilfe von __COMPAT_LAYER kann man auch feststellen, ob das eigene Programm mit AppCompat-Layern ausgeführt wird.

Zum Lesen und Setzen der permantenten AppCompat-Layer (Dateieigenschaften) gibt es (meines Wissens nur) undokumentierte Funktionen (welche momentan die o.g. Registrywerte lesen/setzen):

Delphi-Quellcode:

interface

uses
  Windows;

const
  APPHELP_PERMLAYERS_LOCAL  = $00000001;
  APPHELP_PERMLAYERS_GLOBAL = $00000002;
  APPHELP_PERMLAYERS_ALL =
    APPHELP_PERMLAYERS_LOCAL or
    APPHELP_PERMLAYERS_GLOBAL;

type
  TFNGetPermLayers = function(wszPath: LPCWSTR; wszBuffer: LPWSTR; var pdwBytes: ULONG; dwFlags: ULONG): BOOL; stdcall;

function GetPermLayers(wszPath: LPCWSTR; wszBuffer: LPWSTR; var pdwBytes: ULONG; dwFlags: ULONG): BOOL; stdcall;

type
  TFNSetPermLayers = function(wszPath, wszLayers: LPCWSTR; bGlobal: BOOL): BOOL; stdcall;

function SetPermLayers(wszPath, wszLayers: LPCWSTR; bGlobal: BOOL): BOOL; stdcall;

const
  AppHelpLib = 'apphelp.dll';

implementation

function GetPermLayers; external AppHelpLib;
function SetPermLayers; external AppHelpLib;

end.

[Bomberbb]

Besten Dank, werd ich mal ausprobieren!

[Bomberbb]

nun hab ich's:

SetEnvironmentVariable('__COMPAT_LAYER', 'DisableThemes DisableDWM');
CreateProcess(Nil,PChar('test.exe'),Nil,Nil,False, CREATE_NO_WINDOW,Nil,Nil,si,pi);

DANKE!!!

[Fridolin Walther]

Du solltest __COMPAT_LAYER danach dann aber auch wieder zurück setzen, ansonsten werden alle Anwendungen mit dem Kompatibilitätslayer gestartet.

[Bomberbb]

Ich hatte irgendwo gelesen, dass __COMPAT_LAYER Anwendungslokal ist. Habe es nicht zurückgesetzt, da das Prog nur aus den 3 Zeilen besteht. In anderen Anwendungen ist es natürlich sinnvoll die Variable auch wieder zurückzusetzen.

[Fridolin Walther]

Zitat von Bomberbb:

Ich hatte irgendwo gelesen, dass __COMPAT_LAYER Anwendungslokal ist. Habe es nicht zurückgesetzt, da das Prog nur aus den 3 Zeilen besteht. In anderen Anwendungen ist es natürlich sinnvoll die Variable auch wieder zurückzusetzen.

Ja, es ist schon lokal. Aber wenn Deine Anwendung eine Applikation startet, ist es naheliegend das sie noch weitere startet. Deshalb der Hinweis, das alle anderen Applikationen dann auch im Kompatibilitätsmodus ausgeführt werden. Wenn sie das nicht tut und nur aus 3 Zeilen besteht, ists natürlich eher egal.