Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 01/06/2016 in all areas

  1. Melba23

    Get style of a control

    jdelaney, This script will do that: #include <GUIConstantsEx.au3> #include <MsgBoxConstants.au3> $hGUI = GUICreate("Test", 500, 500) $cRadio_1 = GUICtrlCreateRadio(" Radio control 1", 10, 10, 200, 20) $cRadio_2 = GUICtrlCreateRadio(" Radio control 2", 10, 40, 200, 20) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $cRadio_1, $cRadio_2 $sMsg = "" If GUICtrlRead($cRadio_1) = $GUI_CHECKED Then $sMsg &= "State: Radio 1 checked" Else $sMsg &= "Text: " & GUICtrlRead($cRadio_1, 1) EndIf $sMsg &= @CRLF If GUICtrlRead($cRadio_2) = $GUI_CHECKED Then $sMsg &= "State: Radio 2 checked" Else $sMsg &= "Text: " & GUICtrlRead($cRadio_2, 1) EndIf MsgBox($MB_SYSTEMMODAL, "Result", $sMsg) EndSwitch WEndIf you actually want the style, then you need to call the API as explained in the Setting Styles tutorial in the Wiki: #include <Constants.au3> ; Do not forget these include files! #include <WinAPI.au3> $iStyle = _WinAPI_GetWindowLong(GUICtrlGetHandle($cControlID), $GWL_STYLE) $iExStyle = _WinAPI_GetWindowLong(GUICtrlGetHandle($cControlID), $GWL_EXSTYLE) M23
    1 point
  2. With ObjCreate("winhttp.winhttprequest.5.1") .Open("GET", 'https://secure.logmein.com/public-api/v1/hosts') .SetRequestHeader("Authorization", '{"companyId":"1cccsss43","psk":"00_"}') .SetRequestHeader("Content-Type", 'application/json') .Send() MsgBox(4096, ".ResponseText", .ResponseText()) MsgBox(4096, "Status", .Status) EndWith
    1 point
  3. You have to use RegDelete("HK...") or Run("reg delete..."), but RegDelete("reg delete...") has no sense.. RegDelete ("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Appx\AppxAllUserStore\" & $aArrayOfData[0] & "\Microsoft.WindowsDVDPlayer_2019.6.13291.0_neutral_~_8wekyb3d8bbwe") ; or RegDelete ("HKLM64\SOFTWARE\Microsoft\Windows\CurrentVersion\Appx\AppxAllUserStore\" & $aArrayOfData[0] & "\Microsoft.WindowsDVDPlayer_2019.6.13291.0_neutral_~_8wekyb3d8bbwe")
    1 point
×
×
  • Create New...