WinSetStyle apparently missing

Issue #22 closed
Winter Laite created an issue

WinGetStyle exists, however.

Comments (4)

  1. Winter Laite reporter

    WinSetStyleTest (working). Removes and re-adds the title bar, depending on button pressed.

    MyGui := Gui(, "KEYSHARP TESTS")
    MyEdit := MyGui.Add("Edit", "w120 h100")
    
    MyBtn := MyGui.Add("Button", "w50 h15 x10 y+10", "Set")
    MyBtn.SetFont("s6 cBlue")
    MyBtn2 := MyGui.Add("Button", "w50 h15 x70 yp", "Reset")
    MyBtn2.SetFont("s6 cBlue")
    
    MyBtn.OnEvent("Click", "Set_Style")
    MyBtn2.OnEvent("Click", "Reset_Style")
    
    MyGui.Show()
    
    Set_Style() {
        WinSetStyle("-0xC00000", "A")
    }
    
    Reset_Style() {
        WinSetStyle("+0xC00000", "A")
    }
    

    WinSetExStyle test (working). Toggles presence in TaskBar and presence of icon in GUI title (Win10, can’t test on Win7).

    Run("Notepad")
    WinWait("Untitled - Notepad")
    MyGui := Gui(, "ExStyle Test")
    
    MyBtn := MyGui.Add("Button", "x10 y+10", "Toggle")
    MyBtn.SetFont("s10 cBlue")
    
    
    MyBtn.OnEvent("Click", "ToggleAltTab")
    
    MyGui.Show()
    
    ToggleAltTab() {
        WinSetExStyle("^0x80", "ahk_class Notepad")
    }
    

    Fixed, please mark as resolved and close. Thanks!

  2. Log in to comment