Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 11/03/2022 in all areas

  1. Assume you use the standard /tcb(=0)? It works fine for me when I Cute&Paste the code and tidy it. Could you please send me the original file and tell me your tab settings in SciTE?
    1 point
  2. I got same result as Nine : #include <GuiRichEdit.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Local $hGUI = GUICreate('Test GUI', 200, 200, -1, -1) Local $hRichEdit = _GUICtrlRichEdit_Create($hGUI, '', 20, 20, 160, 160, BitOR($ES_MULTILINE, $ES_AUTOVSCROLL), $WS_EX_TRANSPARENT) ;Yes $WS_VSCROLL is not enabled _GUICtrlRichEdit_SetEventMask($hRichEdit, $ENM_SCROLLEVENTS) ;$ENM_SCROLLEVENTS - Sends EN_MSGFILTER notifications for mouse wheel events For $i = 1 To 20 _GUICtrlRichEdit_AppendText($hRichEdit, $i & ' - this is a test message' & @CRLF) Next GUIRegisterMsg($WM_NOTIFY, 'WM_NOTIFY') GUISetState(@SW_SHOW, $hGUI) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE _GUICtrlRichEdit_Destroy($hRichEdit) GUIDelete($hGUI) Exit EndSwitch WEnd Func WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam) #forceref $hWnd, $iMsg, $wParam Local $tNMHDR = DllStructCreate($tagNMHDR, $lParam) ; Local $tMsgFilter = DllStructCreate($tagMSGFILTER, $lParam) Switch DllStructGetData($tNMHDR, 'hWndFrom') Case $hRichEdit Switch DllStructGetData($tNMHDR, 'Code') Case $EN_MSGFILTER Local Static $iCounter = 0 $iCounter += 1 ConsoleWrite("$EN_MSGFILTER " & $iCounter & @crlf) ; reminder $tagMSGFILTER = "align 4;" & $tagNMHDR & ";uint msg;wparam wParam;lparam lParam" Local $tMsgFilter = DllStructCreate($tagMSGFILTER, $lParam) ConsoleWrite("$tMsgFilter.msg = " & $tMsgFilter.msg & " $tMsgFilter.wparam = " & $tMsgFilter.wparam & _ " $tMsgFilter.lparam = " & $tMsgFilter.lparam & @crlf) If DllStructGetData($tMsgFilter, 'msg') <> 0 Then ConsoleWrite('Scroll ' & DllStructGetData($tMsgFilter, 'msg') & @CRLF & @CRLF) EndIf EndSwitch EndSwitch Return $GUI_RUNDEFMSG EndFunc Scite Console, after mousewheel scrolled down ($tMsgFilter.wparam = 1) then mousewheel scrolled up ($tMsgFilter.wparam = 0) $EN_MSGFILTER 1 $tMsgFilter.msg = 277 $tMsgFilter.wparam = 1 $tMsgFilter.lparam = 0 Scroll 277 $EN_MSGFILTER 2 $tMsgFilter.msg = 277 $tMsgFilter.wparam = 0 $tMsgFilter.lparam = 0 Scroll 277
    1 point
  3. The wParam member of the $tagMSGFILTER structure tells whether it is mouse wheel up or down (0 or 1).
    1 point
  4. Uploaded a new zip file to beta containing the following changes: added one extra option to exclude the ABBREVS from AutoComplete with as default for them to be included: # Include Abbrevs in AutoComplete dropdown (default=y) autocomplete.au3.include_abbrevs=n #AutoIt3Wrapper_Version directive is now taken into account for reading the Include files and takes president over the #SciTE4AutoIt3_Dynamic_Include_version & dynamic.include.version. Some more changes to the API dynamic generation used for Tooltips. They didn't always contain the proper relative include path correctly.
    1 point
  5. trancexx

    Random Color

    Couple of reasons. Color value is always expected to be integer value, every function that will use it will turn it to number therefore, hence making it a string makes absolutely no sense. Next is string concatenation of three random numbers. What's that? An attempt of "randomizing" every color val for it self? I hope not. Implementation is to dumb, almost as much as the idea. edit: Anyway, random RGB color is: Random(0, 0xFFFFFF, 1) Anything else is
    1 point
×
×
  • Create New...