Sign in to follow this  
Followers 0
SirDarknight1200

How to change tab and other properties?

6 posts in this topic

As an example,If I want my script to open in Win 7

Control PanelSystem and SecuritySystem>Advanced System Settings>Performance>Settings>Adjust for best performance

 

Which variables I need to use?

Share this post


Link to post
Share on other sites



Hi, SirDarknight1200. Something like this maybe?

Opt("WinTitleMatchMode", 4)

Run("control sysdm.cpl,,3")

WinWaitActive("classname=#32770")
$handle = WinGetHandle("active")
ControlClick("","","Button2")

WinWaitActive("classname=#32770")
ControlClick("","","Button3")

ControlClick("","","Button5")

WinWaitActive("handle="&$handle)
ControlClick("","","Button9")

√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites

Thanks a lot!I'll let u know if it works

Share this post


Link to post
Share on other sites

Just change the values in the registry directly if you are looking for automation. Here is how I set them (requires a reboot to take effect):

Func SetVisuals()

    If @OSVersion = "WIN_XP" Then
        RegWrite("HKCU\Control Panel\Desktop", "UserPreferenceMask", "REG_BINARY", 90120180)
        RegWrite("HKCU\Control Panel\Desktop\WindowMetrics", "MinAnimate", "REG_SZ", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "ListviewAlphaSelect", "REG_DWORD", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarAnimations", "REG_DWORD", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "ListviewWatermark", "REG_DWORD", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "ListviewShadow", "REG_DWORD", 1)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\VisualEffects", "VisualFXSetting", "REG_DWORD", 3)
    Else
        RegWrite("HKCU\Control Panel\Desktop", "UserPreferenceMask", "REG_BINARY", 9012018010000000)
        RegWrite("HKCU\Control Panel\Desktop\WindowMetrics", "MinAnimate", "REG_SZ", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "ListviewAlphaSelect", "REG_DWORD", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarAnimations", "REG_DWORD", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\VisualEffects", "VisualFXSetting", "REG_DWORD", 3)
        RegWrite("HKCU\Software\Microsoft\Windows\DWM", "EnableAeroPeek", "REG_DWORD", 0)
        RegWrite("HKCU\Software\Microsoft\Windows\DWM", "CompositionPolicy", "REG_DWORD", 1)
        RegWrite("HKCU\Software\Microsoft\Windows\DWM", "ColorizationOpaqueBlend", "REG_DWORD", 1)
        RegWrite("HKCU\Software\Microsoft\Windows\DWM", "AlwaysHibernateThumbnails", "REG_DWORD", 0)
    EndIf

EndFunc   ;==>SetVisuals

This assumes that you are using XP or newer OS. Also, keep in mind that these settings are adjusted for my purposes. This does not set the options to "Best Performance", but rather changes the settings to adjust all but a few settings so that visual styles remain but are much less intrusive. It will keep Aero enabled on Vista and 7 as well.

Share this post


Link to post
Share on other sites

Hmm... That's good. Thanks

Share this post


Link to post
Share on other sites

Hmm... That's good. Thanks

 

Please mark your question as answered if you have what you need :)

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0