Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 11/05/2020 in all areas

  1. water

    AD - Active Directory UDF

    Version 1.6.3.0

    17,299 downloads

    Extensive library to control and manipulate Microsoft Active Directory. Threads: Development - General Help & Support - Example Scripts - Wiki Previous downloads: 30467 Known Bugs: (last changed: 2020-10-05) None Things to come: (last changed: 2020-07-21) None BTW: If you like this UDF please click the "I like this" button. This tells me where to next put my development effort
    1 point
  2. Hmmm.... as far as I create reproducer and @Jos fix Au3Stripper about 4 year ago..... No. EDIT: 7years ago https://www.autoitscript.com/trac/autoit/ticket/2524
    1 point
  3. Here one way : #include <MsgBoxConstants.au3> #include <StructureConstants.au3> #include <WinAPIConstants.au3> #include <WinAPISys.au3> #include <WindowsConstants.au3> #include <Misc.au3> Global Const $tagMSLLHOOKSTRUCT = $tagPOINT & ";dword mouseData;dword flags;dword time;ulong_ptr dwExtraInfo" Global $hHook, $hStub_MouseProc HotKeySet("{ESC}", _Exit) OnAutoItExitRegister(Cleanup) Example() Func Example() Local $hMod $hStub_MouseProc = DllCallbackRegister(_MouseProc, "long", "int;wparam;lparam") $hMod = _WinAPI_GetModuleHandle(0) $hHook = _WinAPI_SetWindowsHookEx($WH_MOUSE_LL, DllCallbackGetPtr($hStub_MouseProc), $hMod) While True Sleep(100) WEnd EndFunc ;==>Example Func _MouseProc($nCode, $wParam, $lParam) Local $xevent If $nCode < 0 Then Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam) Local $tMouseHOOKS = DllStructCreate($tagMSLLHOOKSTRUCT, $lParam) Local $ptx = DllStructGetData($tMouseHOOKS, "X") Local $pty = DllStructGetData($tMouseHOOKS, "Y") Local $mouseData = DllStructGetData($tMouseHOOKS, "mousedata") Local $flags = DllStructGetData($tMouseHOOKS, "flags") Switch $wParam Case $WM_MOUSEMOVE $xevent = "Mouse Move" Case $WM_MOUSEWHEEL If _WinAPI_HiWord($mouseData) > 0 Then $xevent = "Wheel Forward" Else $xevent = "Wheel Backward" EndIf Case $WM_LBUTTONDOWN Return 1 ; (will block) $xevent = "Left Down" Case $WM_LBUTTONUP Return 1 ; (will block) $xevent = "Left Up" Case $WM_RBUTTONDOWN $xevent = "Right Down" Case $WM_RBUTTONUP $xevent = "Right Up" Case $WM_MBUTTONDBLCLK $xevent = "Double Wheel Click" Case $WM_MBUTTONDOWN $xevent = "Wheel Down" Case $WM_MBUTTONUP $xevent = "Wheel Up" EndSwitch ConsoleWrite($xevent & @CRLF) Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam) EndFunc ;==>_MouseProc Func Cleanup() _WinAPI_UnhookWindowsHookEx($hHook) DllCallbackFree($hStub_MouseProc) EndFunc ;==>Cleanup Func _Exit() Exit EndFunc ;==>_Exit
    1 point
  4. Updated the function in the first post. Improved performance, cleanup and commented.
    1 point
  5. seadoggie01

    IPRange Extractor

    Well... you can start by not splitting on every newline. RegEx will apply to each line: Global $g_sRegexPattern_T = "#.+?\t\t(.+)\t\t(.+)" ConsoleWrite(StringRegExpReplace(FileRead(@ScriptDir & "\1.txt"), $g_sRegexPattern_T, "$1:$2") & @CRLF)
    1 point
  6. Muzaiyan

    Progressbar New Styles

    Salam, Hello, Hi Today i am showing you some new styles of progress bar i don't know if anyone posted a thing like this on thins forum _GUICtrlCreateProgress This UDF allows you to create new style progress bar Colors, Values can be changed by using native functions of autoit i created this script years ago while i was not on this forum now i think it should be shared on this forum check this out if anyone is interested any help is greatly appreciated NEW $PBSC_LINE_LEFT_TO_TIGHT changed to $PBSC_LINE_LEFT_TO_RIGHT New Style Progressbar.rar old New Style Progressbar.rar
    1 point
×
×
  • Create New...