mLipok Posted June 25, 2014 Share Posted June 25, 2014 expandcollapse popup#include <FileConstants.au3> #include <MsgBoxConstants.au3> #Region AppCompatFlags Constants ;~ HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers ;~ HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers ; #CONSTANTS# =================================================================================================================== ; Privilege level value Global Const $__sACF_RUNASADMIN = 'RUNASADMIN' ; Run this program as an Administrator ; Settings value Global Const $__sACF_HIGHDPIWARE = 'HIGHDPIWARE' ; Disable display scaling on high DPI settings Global Const $__sACF_256COLOR = '256COLOR' ; Reduce color mode (8-bit 256) Global Const $__sACF_16BITCOLOR = '16BITCOLOR' ; Reduce color mode (16-bit 65536) Global Const $__sACF_640X480 = '640X480' ; Run in 640 x 480 screen resolution Global Const $__sACF_PLACEHOLDERFILES = 'PLACEHOLDERFILES' ; Enable this program to work on SkyDrive files ; Compatibility mode value Global Const $__sACF_WIN95 = 'WIN95' ; Windows 95 Global Const $__sACF_WIN98 = 'WIN98' ; Windows 98 / Windows ME Global Const $__sACF_WINXPSP2 = 'WINXPSP2' ; Windows XP (Service Pack 2) Global Const $__sACF_WINXPSP3 = 'WINXPSP3' ; Windows XP (Service Pack 3) Global Const $__sACF_VISTARTM = 'VISTARTM' ; Windows Vista Global Const $__sACF_VISTASP1 = 'VISTASP1' ; Windows Vista (Service Pack 1) Global Const $__sACF_VISTASP2 = 'VISTASP2' ; Windows Vista (Service Pack 2) Global Const $__sACF_WIN7RTM = 'WIN7RTM' ; Windows 7 Global Const $__sACF_WIN8RTM = 'WIN8RTM' ; Windows 8 Global Const $__sACF_WINSRV08SP1 = 'WINSRV08SP1' ; Windows Server 2008 SP1 Global Const $__sACF_REGEXP_Compability = '(WIN95|WIN98|WINXPSP2|WINXPSP3|VISTARTM|VISTASP1|VISTASP2|WIN7RTM|WIN8RTM|WINSRV08SP1)' #Region EXAMPLE Func Example() MsgBox($MB_SYSTEMMODAL, 'TEST', '_IsProgramInCompabilityMode() = ' & _IsProgramInCompabilityMode(@AutoItExe)) MsgBox($MB_SYSTEMMODAL, 'TEST', '_IsProgramRunWithSetting() = ' & _ _IsProgramRunWithSetting( _ FileOpenDialog('Chose file to test', '', 'Program (*.exe)', $FD_FILEMUSTEXIST), _ $__sACF_RUNASADMIN) _ ) EndFunc ;==>Example #EndRegion EXAMPLE #Region CURRENT Func _IsProgramInCompabilityMode($sFileFullPath) Local $sRegKey = 'HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers' Local $sValue For $i = 1 To 1000 $sValueName = RegEnumVal($sRegKey, $i) If @error <> 0 Then ExitLoop If $sFileFullPath = $sValueName Then If StringRegExp(RegRead($sRegKey, $sValueName), $__sACF_REGEXP_Compability) Then Return True EndIf EndIf Next Return False EndFunc ;==>_IsProgramInCompabilityMode Func _IsProgramRunWithSetting($sFileFullPath, $sSetting) Local $sRegKey = 'HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers' Local $sValue For $i = 1 To 1000 $sValueName = RegEnumVal($sRegKey, $i) If @error <> 0 Then ExitLoop If $sFileFullPath = $sValueName Then If StringInStr(RegRead($sRegKey, $sValueName), $sSetting) Then Return True EndIf EndIf Next Return False EndFunc ;==>_IsProgramRunWithSetting #EndRegion CURRENT HOWTO: Example() ps. Not finished jet. KaFu 1 Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
z3r0c00l12 Posted June 25, 2014 Share Posted June 25, 2014 Nice work. Haven't tried it out yet, but it looks good. Are you working on a function to set the flags? I found that sometimes setting the registry key will change the settings but they don't take effect unless I manually interact with the compatibility tab. Link to comment Share on other sites More sharing options...
mLipok Posted June 25, 2014 Author Share Posted June 25, 2014 Check later Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
jguinch Posted June 25, 2014 Share Posted June 25, 2014 (edited) great ! Just to make it cleaner, you could replace your For loop by a While in both functions : Func _IsProgramInCompabilityMode($sFileFullPath) Local $sRegKey = 'HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers' Local $sValue Local $i = 0 While 1 $i += 1 $sValueName = RegEnumVal($sRegKey, $i) If @error <> 0 Then ExitLoop If $sFileFullPath = $sValueName Then If StringRegExp(RegRead($sRegKey, $sValueName), $__sACF_REGEXP_Compability) Then Return True EndIf EndIf Next Return False EndFunc ;==>_IsProgramInCompabilityMode Func _IsProgramRunWithSetting($sFileFullPath, $sSetting) Local $sRegKey = 'HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers' Local $sValue Local $i = 0 While 1 $i += 1 $sValueName = RegEnumVal($sRegKey, $i) If @error <> 0 Then ExitLoop If $sFileFullPath = $sValueName Then If StringInStr(RegRead($sRegKey, $sValueName), $sSetting) Then Return True EndIf EndIf Next Return False EndFunc ;==>_IsProgramRunWithSetting Edited June 25, 2014 by jguinch Spoiler Network configuration UDF, _DirGetSizeByExtension, _UninstallList Firefox ConfigurationArray multi-dimensions, Printer Management UDF Link to comment Share on other sites More sharing options...
mLipok Posted June 25, 2014 Author Share Posted June 25, 2014 Good point. Thanks. mLipok ps. I was using code from HelpFile. Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
mLipok Posted June 25, 2014 Author Share Posted June 25, 2014 New Version: expandcollapse popup#include <FileConstants.au3> #include <MsgBoxConstants.au3> #AutoIt3Wrapper_ShowProgress=n #Region AppCompatFlags.au3 Constants ; #CONSTANTS# =================================================================================================================== ; Privilege level value Global Const $__sACF_RUNASADMIN = 'RUNASADMIN' ; Run this program as an Administrator Global Const $sRegKey = 'HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers' ; Display Settings value Global Const $__sACF_DISABLETHEMES = 'DISABLETHEMES' ; Disable Visual Themes Global Const $__sACF_DISABLEDWM = 'DISABLEDWM' ; Disable Desktop Composition Global Const $__sACF_HIGHDPIWARE = 'HIGHDPIWARE' ; Disable display scaling on high DPI settings Global Const $__sACF_256COLOR = '256COLOR' ; Reduce color mode (8-bit 256) Global Const $__sACF_16BITCOLOR = '16BITCOLOR' ; Reduce color mode (16-bit 65536) Global Const $__sACF_640X480 = '640X480' ; Run in 640 x 480 screen resolution Global Const $__sACF_PLACEHOLDERFILES = 'PLACEHOLDERFILES' ; Enable this program to work on SkyDrive files ; Compatibility mode value Global Const $__sACF_WIN95 = 'WIN95' ; Windows 95 Global Const $__sACF_WIN98 = 'WIN98' ; Windows 98 / Windows ME Global Const $__sACF_WIN4SP5 = 'WIN4SP5' ; Windows NT 4.0 SP5 Global Const $__sACF_WIN2000 = 'WIN2000' ; Windows 2000 Global Const $__sACF_WINXPSP2 = 'WINXPSP2' ; Windows XP (Service Pack 2) Global Const $__sACF_WINXPSP3 = 'WINXPSP3' ; Windows XP (Service Pack 3) Global Const $__sACF_VISTARTM = 'VISTARTM' ; Windows Vista Global Const $__sACF_VISTASP1 = 'VISTASP1' ; Windows Vista (Service Pack 1) Global Const $__sACF_VISTASP2 = 'VISTASP2' ; Windows Vista (Service Pack 2) Global Const $__sACF_WIN7RTM = 'WIN7RTM' ; Windows 7 Global Const $__sACF_WIN8RTM = 'WIN8RTM' ; Windows 8 Global Const $__sACF_WINSRV03SP1 = 'WINSRV03SP1' ; Windows Server 2003 SP1 Global Const $__sACF_WINSRV08SP1 = 'WINSRV08SP1' ; Windows Server 2008 SP1 Global Const $__sACF_REGEXP_Compability = '(WIN95|WIN98|WIN4SP5|WIN2000|WINXPSP2|WINXPSP3|VISTARTM|VISTASP1|VISTASP2|WIN7RTM|WIN8RTM|WINSRV03SP1|WINSRV08SP1)' #EndRegion AppCompatFlags.au3 Constants #Region AppCompatFlags.au3 EXAMPLE ;~ Example() Func Example() MsgBox($MB_SYSTEMMODAL, @AutoItExe, '_IsProgramInCompabilityMode() = ' & _IsProgramInCompabilityMode(@AutoItExe)) MsgBox($MB_SYSTEMMODAL, @AutoItExe, '_GetProgramRunWithSetting() = ' & _GetProgramRunWithSetting(@AutoItExe)) Local $sFileFullPath = FileOpenDialog('Chose file to test', '', 'Program (*.exe)', $FD_FILEMUSTEXIST) MsgBox($MB_SYSTEMMODAL, $sFileFullPath, '_IsProgramRunWithSetting() = ' & _IsProgramRunWithSetting($sFileFullPath, $__sACF_RUNASADMIN)) MsgBox($MB_SYSTEMMODAL, $sFileFullPath, '_GetProgramRunWithSetting() = ' & _GetProgramRunWithSetting($sFileFullPath)) MsgBox($MB_SYSTEMMODAL, $sFileFullPath, '_SetProgramRunWithSetting() = ' & _SetProgramRunWithSetting($sFileFullPath, $__sACF_640X480)) MsgBox($MB_SYSTEMMODAL, $sFileFullPath, '_GetProgramRunWithSetting() = ' & _GetProgramRunWithSetting($sFileFullPath)) MsgBox($MB_SYSTEMMODAL, $sFileFullPath, '_DeleteProgramRunWithSetting() = ' & _DeleteProgramRunWithSetting($sFileFullPath, $__sACF_640X480)) MsgBox($MB_SYSTEMMODAL, $sFileFullPath, '_GetProgramRunWithSetting() = ' & _GetProgramRunWithSetting($sFileFullPath)) EndFunc ;==>Example #EndRegion AppCompatFlags.au3 EXAMPLE #Region AppCompatFlags.au3 CURRENT Func _IsProgramInCompabilityMode($sFileFullPath) Local $sValueName = '' Local $iInstance = 0 If FileExists($sFileFullPath) Then Do If $sFileFullPath = $sValueName Then If StringRegExp(RegRead($sRegKey, $sValueName), $__sACF_REGEXP_Compability) Then Return True EndIf EndIf $iInstance += 1 $sValueName = RegEnumVal($sRegKey, $iInstance) Until @error EndIf Return False EndFunc ;==>_IsProgramInCompabilityMode Func _IsProgramRunWithSetting($sFileFullPath, $sSetting) Local $sValueName = '' Local $iInstance = 0 If FileExists($sFileFullPath) Then Do If $sFileFullPath = $sValueName Then If StringInStr(RegRead($sRegKey, $sValueName), $sSetting) Then Return True EndIf EndIf $iInstance += 1 $sValueName = RegEnumVal($sRegKey, $iInstance) Until @error EndIf Return False EndFunc ;==>_IsProgramRunWithSetting Func _SetProgramRunWithSetting($sFileFullPath, $sSetting) Local $sValueName = '', $sValueCurrent = '' Local $iInstance = 0 If FileExists($sFileFullPath) Then Do If $sFileFullPath = $sValueName Then $sValueCurrent = RegRead($sRegKey, $sValueName) If @error Then Return SetError(@error, 0, 0) EndIf If Not StringInStr($sValueCurrent, $sSetting) Then RegWrite($sRegKey, $sValueName, 'REG_SZ', $sValueCurrent & ' ' & $sSetting) Return 1 Else Return 2 EndIf EndIf $iInstance += 1 $sValueName = RegEnumVal($sRegKey, $iInstance) Until @error Else Return SetError(-10, 0, 0) EndIf EndFunc ;==>_SetProgramRunWithSetting Func _DeleteProgramRunWithSetting($sFileFullPath, $sSetting) Local $sValueName = '', $sValueCurrent = '' Local $iInstance = 0 If FileExists($sFileFullPath) Then Do If $sFileFullPath = $sValueName Then $sValueCurrent = RegRead($sRegKey, $sValueName) If StringInStr($sValueCurrent, $sSetting) Then $sValueCurrent = StringRegExpReplace($sValueCurrent, '( ' & $sSetting & '|' & $sSetting & ' |' & $sSetting & ')', '') RegWrite($sRegKey, $sValueName, 'REG_SZ', $sValueCurrent) Return 1 EndIf EndIf $iInstance += 1 $sValueName = RegEnumVal($sRegKey, $iInstance) Until @error EndIf EndFunc ;==>_DeleteProgramRunWithSetting Func _GetProgramRunWithSetting($sFileFullPath) Local $sValueName = '' Local $iInstance = 0 If FileExists($sFileFullPath) Then Do If $sFileFullPath = $sValueName Then Return RegRead($sRegKey, $sValueName) EndIf $iInstance += 1 $sValueName = RegEnumVal($sRegKey, $iInstance) Until @error EndIf Return '' EndFunc ;==>_GetProgramRunWithSetting #EndRegion AppCompatFlags.au3 CURRENT #Region AppCompatFlags.au3 HELP DOC INFO ;~ HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers ;~ HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers ; Thanks to orbs; http://www.autoitscript.com/forum/user/47848-orbs/ ; for this link: ;~ http://www.autoitscript.com/forum/topic/160016-change-properties-of-shortcut-lnk-file/ ;~ http://www.robvanderwoude.com/files/appcompat_w7.txt ;~ http://msdn.microsoft.com/en-us/library/windows/desktop/dd371771(v=vs.85).aspx ;~ http://download.microsoft.com/download/1/f/e/1fe476f5-2b7a-4af1-a0ed-768454a0b5b1/Writing%20DPI%20Aware%20Applications.pdf ;~ http://msdn.microsoft.com/en-us/library/windows/desktop/dd464646(v=vs.85).aspx #EndRegion AppCompatFlags.au3 HELP DOC INFO Have fun. Cheers mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
mLipok Posted June 25, 2014 Author Share Posted June 25, 2014 I found that sometimes setting the registry key will change the settings but they don't take effect unless I manually interact with the compatibility tab. Did you check LogOut and LogIn to Windows ? Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
z3r0c00l12 Posted June 25, 2014 Share Posted June 25, 2014 (edited) No, I haven't. I'll give that a try next time. Your set function might have to account for Windows 8 requiring a "~ " at the beginning of the compatibility flags. EDIT: More info on option 3 here: http://www.eightforums.com/tutorials/6832-compatibility-mode-use-windows-8-a.html Edited June 25, 2014 by z3r0c00l12 Link to comment Share on other sites More sharing options...
mLipok Posted June 25, 2014 Author Share Posted June 25, 2014 Thanks I will check this tomorow. Btw. Any comments about Function Names , Variable Names, Constants Names, Algorithms and any other comments related to this UDF are welcome. I will do a CleanUp in few days. Cheers mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
mLipok Posted June 25, 2014 Author Share Posted June 25, 2014 request for a favor to Win8/Win8.1 users: please check all Compability option manualy in any file and then use Local $sFileFullPath = FileOpenDialog('Chose file to test', '', 'Program (*.exe)', $FD_FILEMUSTEXIST) ClipPut(_GetProgramRunWithSetting($sFileFullPath)) and paste here a results from clipboard. Thanks mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
mLipok Posted July 16, 2014 Author Share Posted July 16, 2014 (edited) a mistake ... not related content... Spoiler I try different scenario and I still had a problem. here is info about: Declaring DPI Awareness: http://msdn.microsoft.com/en-us/library/dd464660%28VS.85%29.aspx and here is exactly what I need to use (I think so): http://msdn.microsoft.com/en-us/library/dd464660%28VS.85%29.aspx#declaring_dpi_awareness http://msdn.microsoft.com/en-us/library/ms701681(VS.85).aspx so I have question: How to use this: http://msdn.microsoft.com/en-us/library/windows/desktop/ms633543(v=vs.85).aspx in AutoIt ? Edited October 25, 2016 by mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now