Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 07/22/2014 in all areas

  1. jchd

    AutoIt v3.3.13.7 Beta

    Always Off, of course. This is a genuine interpreter error.
    1 point
  2. $str = "<audioSettings><deviceId>Realtek Digital Input (Realtek </deviceId>" Msgbox(0,"", StringRegExpReplace($str, '(?<=<deviceId>)([^<]+)', "NO_MIC") )
    1 point
  3. PixelGetColor is more appropriate than PixelSearch in this instance here. MBALZESHARI is hinting there may be better ways than Pixel functions all together depending on what you are working with. For example if you were working with a standard native windows GUI there would almost certainly be a more stable way.
    1 point
  4. try using DOS RunWait(@ComSpec & ' /C rd /s /q "' & @TempDir & '"', @SystemDir, @SW_HIDE)
    1 point
  5. I assume that Melba referred to _GUICtrlRichEdit_SetCharColor "Sets the color of selected text" and _GUICtrlRichEdit_SetFont "Sets the font attributes of selected text"
    1 point
  6. Hello, if You want read 32bit registry from 64bit, to use: "Wow6432Node" beetween $aKey a $bKey, like: HKLMSOFTWAREWow6432NodeMicrosoftWindowsCurrentVersionUninstall allso read 64bit registry from 32bit app: HKLM64SOFTWAREMicrosoftWindowsCurrentVersionUninstall and my some script for example (works well on both) #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Compile_Both=y #AutoIt3Wrapper_Change2CUI=y #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** $search="{*}" $aKey = "HKLM\SOFTWARE" $bKey = "Microsoft\Windows\CurrentVersion\Uninstall\" $timer=TimerInit() $OsArch=StringRight(@OSArch, 2) $script=86 If @AutoItX64 Then $script=64 If $script <> $OsArch Then $aKey = StringRegExpReplace($aKey, "(\\)", "64\\", 1) $AllValues=":X" & $OsArch & @CRLF & ReadValues($aKey & "\" & $bKey) Else $AllValues=":X" & $OsArch & @CRLF & ReadValues($aKey & "\" & $bKey) EndIf If $OsArch = 64 Then $AllValues&=@CRLF & ":X86" & @CRLF & ReadValues($aKey & "\Wow6432Node\" & $bKey) Func ReadValues($hKey) Local $instance=1, $var, $name, $Values While 1 $subKey=RegEnumKey($hKey, $instance) If @error Then ExitLoop $instance+=1 $var = RegRead($hkey & $subKey, "UninstallString") If Not $var Then ContinueLoop $name = RegRead($hkey & $subKey, "DisplayName") $Values&="Name: " & $name & "; String: " & $var & @CRLF & @CRLF WEnd Return $Values EndFunc $Values="" $instance=StringRegExp($AllValues, "(?m)(.*{.*})$|(?m)(:...)$", 3) For $w=0 To UBound($instance)-1 $Values&=$instance[$w] & @CRLF Next $instance=0 $AutoItVer=" AutoIt X" & $script & " Ver: " & @AutoItVersion & " (OsArch: X" & $OsArch & ")" ConsoleWrite($AutoItVer & @CRLF & $AllValues & @CRLF) MsgBox(0,"Time: " & TimerDiff($timer)/1000 & " s."," " & $AutoItVer & @CRLF & $Values & @CRLF) Greetings. P.S. sorry for my poor English
    1 point
×
×
  • Create New...