Leaderboard

Not trying to re-invent the wheel here, but I found some examples that did A-L-O-T that I didn't think was necessary (like forcing owner-drawn), the sparse number of the web examples were failing miserably too. It looked like @argumentum was taking the path I was on, his is much more feature rich ( 😅 ) ... Anyway, I was going to add a font option using this subclass method (Thanks to @LarsJ for his subclass method, saved me some time) but I am out of time and if I don't post this now, I will probably forget to post it later (Yep, age is getting there). @LarsJ - GUIRegisterMsg20 - @argumentum ComboBox Set DROPDOWNLIST Colors/size UDF (Lots-O-Stuff) Here's my short and sweet (I don't think I ever code anything short.. or sweet) Edit 2024-04-10: Added the font change functions, pay attention to the fact that there are 3 different hwnds, the control hwnd, the edit hwnd as well as the listbox hwnd for the combo box. There are 4 functions, one changes all 3, the others change each of the other hwnds. Edit-2 2024-04-10: So I was going to use the forum members meticulous eyes to find issues, but I seemed to find a few that I didn't notice before myself. - Wrong array bounds in font au3 was fixed - Multi color (LB and Edit different colors) fixed (mistakenly used 1 brush ... oops) for color au3 - Missing edit color logic fixed for color au3 GUIComboBox.2024.04.10-002.zip

#include <GUIConstantsEx.au3> #include <GuiListView.au3> Local $hGUI = GUICreate("How to obtain the right mouse click position for multiple column items",1000,600) Local $OK = GUICtrlCreateButton("OK", 10, 10, 85, 25) Local $ListView = GUICtrlCreateListView("",10,50,978,500) Local $hListView = GUICtrlGetHandle($ListView) For $i = 0 To 19 _GUICtrlListView_AddColumn($ListView,$i,80) Next Local $2DArray[100][20] For $i = 0 To 19 For $t = 0 To 99 $2DArray[$t][$i] = "R"&$t&" - "&"C"&$i Next Next _GUICtrlListView_AddArray($ListView,$2DArray) Local $header = _GUICtrlListView_GetHeader($ListView) GUISetState(@SW_SHOW, $hGUI) GUIRegisterMsg(0x007B, 'WM_CONTEXTMENU') While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE, $OK Exit EndSwitch WEnd Func WM_CONTEXTMENU($hWnd,$Msg,$wParam,$lParam) If $wParam = $hListView Then Local $tPoint = _WinAPI_GetMousePos(True, $hListView) Local $aLVItem =_GUICtrlListView_SubItemHitTest($hListView, $tPoint.X, $tPoint.Y) Local $aHItem = _GUICtrlHeader_HitTest($header, $tPoint.X, $tPoint.Y) If $aHItem[0] <> -1 Then ConsoleWrite('Clicked on header: ' & $aLVItem[1] & @CRLF) EndIf EndFunc Or you can use the info already existent in lParam: Func WM_CONTEXTMENU($hWnd, $iMsg, $wParam, $lParam) #forceref $hWnd, $iMsg If $wParam = $hListView Then Local $tPoint = DllStructCreate('long X;long Y;') $tPoint.X = _WinAPI_LoWord($lParam) $tPoint.Y = _WinAPI_HiWord($lParam) _WinAPI_ScreenToClient($hListView, $tPoint) Local $aLVItem =_GUICtrlListView_SubItemHitTest($hListView, $tPoint.X, $tPoint.Y) Local $aHItem = _GUICtrlHeader_HitTest($header, $tPoint.X, $tPoint.Y) If $aHItem[0] <> -1 Then ConsoleWrite('Clicked on header: ' & $aLVItem[1] & @CRLF) EndIf EndFunc

Okay, sounds good. The Dark CSS is the only one using ex units, and it has a bigger font in a couple places and few other changes, I switched that stuff to Buuf, leaving the colours all the same of course. Now just default is still using px units. Edit: I was looking at the wrong default CSS. Sorry.

I don't clearly remember but as soon as I get home I'll take a look at it 👍

I transferred all the new size/measurement settings from Default/dark CSS to Buuf CSS. Not sure if that's what you wanted? buuf.css

Try this line : ShellExecute(@ScriptFullPath, "", @ScriptDir, @compiled ? "" : "run")

@boat_58 Here without the UDF : #include <GUIConstants.au3> HotKeySet("{F1}", Restart) GUICreate("Test", 150, 70) GUICtrlCreateLabel(@SEC, 40, 30, 50, 20) GUISetState() Do Until GUIGetMsg() = $GUI_EVENT_CLOSE Func Restart() ShellExecute(@ScriptFullPath, "", @ScriptDir, @compiled ? "" : "run") Exit EndFunc

Just wanted to mention there are two typos in your buuf CSS. Theme select looks great by the way.

Yep, you found an issue, If IsArray($aMUpUnique) Then should have been If IsArray($aMatchLower) Then Thanks for finding it, not sure how I did that before I posted ... doh!

Nope, it'll be gone

One thought, does it need the word "Theme" after each theme name? Almost seems a little repetitive?

lol, true. Ok then, there is the code ( from before ) updated ( and a bit more functional too ).

I agree, but maybe a bit bigger font size if so? or would it have the selector box around it as in the example you posted, or without as your website? It may be hard for older eyes to spot it if it is only the dark/light symbol (might think it is a dead fly 🤣)? Otherwise I do also like, as a second best.

I change it again Should I go with "◐" or "Theme ◐" or "Select theme ◐" or, ..what do you think ? In the example I left "◐" as in itself looks sufficient of an indicator for what it does. Edit: I do like the minimalistic view of just " ◐ ". People that care for color theme know that it symbols theme selection.

Ok, found the code:

I find those annoying. Always in sight for something that I'll use once if ever. You can add a number (MsgBox2.htm) up to 5 so far and see the prior edits ( that by now will not be fully functional ) to see the ideas I tried out. Though the idea of a top right corner with a fixed top position ( that will not float always in view ) is enticing but me not having experience in html, I'd have to find it, copy the parts that make it work and make it an include ( like I did with SelectTheme css/js ). But again, is code that will have to "not look bad" throughout out the whole site and easily added. Another thing that am going to go back to is light mode as default. As for what I've seen is more common than OS selected. As always, ideas, code or references are welcomed.