+ get names of "Application Data" and "Local Settings" from registry for multi-language
This commit is contained in:
parent
51742e5457
commit
180a78acc2
@ -1,3 +1,28 @@
|
||||
; get names in local language for "Application Data", "Local Settings" and "Application Data" below "Local Settings"
|
||||
RegRead AD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders, AppData
|
||||
RegRead LS, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders, Local Settings
|
||||
RegRead LAD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders, Local AppData
|
||||
|
||||
If LAD
|
||||
LAD := AD
|
||||
|
||||
StringRight ADc, AD, 1
|
||||
StringRight LSc, LS, 1
|
||||
StringRight LADc, LAD, 1
|
||||
|
||||
If (ADc = "\")
|
||||
StringTrimRight AD, AD, 1
|
||||
|
||||
If (LSc = "\")
|
||||
StringTrimRight LS, LS, 1
|
||||
|
||||
If (LADc = "\")
|
||||
StringTrimRight LAD, LAD, 1
|
||||
|
||||
SplitLast(null, ADn, AD, "\")
|
||||
SplitLast(null, LSn, LS, "\")
|
||||
SplitLast(null, LADn, LAD, "\")
|
||||
|
||||
EnvSet USERPROFILE, %U3_APP_DATA_PATH%
|
||||
|
||||
; %HOMEPATH% is without drive letter and colon, do it also here
|
||||
@ -5,7 +30,7 @@ EnvGet eSystemDrive, SystemDrive
|
||||
StringReplace eHOMEPATH, U3_APP_DATA_PATH, %eSystemDrive%
|
||||
EnvSet HOMEPATH, %U3_APP_DATA_PATH%
|
||||
EnvSet HOMEDRIVE, % EnvValue("U3_DEVICE_PATH")
|
||||
EnvSet APPDATA, % U3_APP_DATA_PATH . "\Application Data"
|
||||
EnvSet APPDATA, % U3_APP_DATA_PATH . "\" . ADn
|
||||
|
||||
; add custom PATH directories
|
||||
EnvGet ePATH, PATH
|
||||
@ -24,6 +49,10 @@ IfNotExist %APPDATA%
|
||||
{
|
||||
FileCreateDir %APPDATA%
|
||||
}
|
||||
IfNotExist %U3_APP_DATA_PATH%\%LSn%\%LADn%
|
||||
{
|
||||
FileCreateDir %U3_APP_DATA_PATH%\%LSn%\%LADn%
|
||||
}
|
||||
|
||||
SetWorkingDir %U3_HOST_EXEC_PATH%
|
||||
cmdl := AppExe
|
||||
|
Reference in New Issue
Block a user