@BotR
How about something like this to automatically generate the path to the installed GG (according to steam generated vakues ) ?
Feed it "266310" for GG and append "\files"
EnableExplicit
Procedure.s GetPathOfSteamApp( SteamAppNo.s)
;{ Docu
; Steam-Apps sind alle unterhalb von #STEAMBASE installiert
; die Apps werden durch deren eineindeutige SteamAppNo identifiziert
; (für GG ist das z.B. "266310"), die als Argument übergeben wird
Protected Key.i = 0, Size.i = #MAX_PATH
Protected found = 0
Protected Install_Loc.s = Space( #MAX_PATH )
Debug "SOFTWARE\"+#STEAM_P_BASE + SteamAppNo
If 0 = RegOpenKeyEx_( #HKEY_LOCAL_MACHINE, "SOFTWARE\"+#STEAM_P_BASE + SteamAppNo, 0, #KEY_READ, @Key )
; der gewünschte Key wurde gefunden
RegQueryValueEx_( Key, "InstallLocation", 0, 0, @Install_Loc, @Size )
; Wert von "InstallLocation" ist der Pfad des GG-Verzeichnisses
RegCloseKey_( Key )
found = 1
EndIf
If found = 0
Debug "SOFTWARE\WOW6432Node\"+ #STEAM_P_BASE + SteamAppNo
If 0 = RegOpenKeyEx_( #HKEY_LOCAL_MACHINE,"SOFTWARE\WOW6432Node\"+ #STEAM_P_BASE + SteamAppNo, 0, #KEY_READ, @Key )
; der gewünschte Key wurde gefunden
RegQueryValueEx_( Key, "InstallLocation", 0, 0, @Install_Loc, @Size )
; Wert von "InstallLocation" ist der Pfad des GG-Verzeichnisses
RegCloseKey_( Key )
found = 1
EndIf
EndIf
If found = 0
MessageRequester( "Error", "Game Guru Steamapp not found in registry")
; der gewünschte Key wurde NICHT gefunden
; Leerstring als Fehler-KZ zurückgebeb
Install_Loc = ""
EndIf
ProcedureReturn Install_Loc
EndProcedure
And maybe, optionally allow non-canonical pathnames, such as ".\Game Guru_DX9\Files"
Lives of great men all remind us we may make our lives sublime
Core i7 4710 QM GTX 980 MQ 16GB RAM Win7
