Incorporate Skinning thourgh Stardock DirectSkin

[stupomer]

I don't want to design custom controls for every little thing but there are many pre-made custom skins that could be applied to entire exe dialogs I have made through QM.
In DirecSkin, there are instructions for how to apply in 



https://www.stardock.com/corporatesolutions/directskin/
https://www.stardock.com/corporatesoluti...dingDS.pdf
https://www.stardock.com/corporatesoluti...nTasks.pdf

The demo shows sample code for COM controls in C#, C/C++ and Visual Basic. Since QM has interfaces with these, I think it would be theoretically possible to use that code through QM but not sure how much work this is.

Thoughts? Interest by others?

From pdf's:

DirectSkin easily integrates with all major programming languages that support ActiveX (COM) controls, including: .Net, C#, C/C++ and Visual Basic.

DirectSkin works on the following Windows platforms:
32-bit Windows 10/8/7/Vista/XP
64-bit Windows 10/8/7/Vista


S

[Gintaras]

Download and install the DirectSkin demo.
Then use code like this in your dialogs.

Macro dialog_DirectSkin

Code:

Copy      Help

;/exe

typelib WBOCXLib {52BD8A52-B792-4C45-A4D9-245CC945AC34} 1.0

str dd=
;BEGIN DIALOG
;0 "" 0x90C80AC8 0x0 0 0 224 136 "Dialog"
;940 ActiveX 0x54030000 0x0 64 36 96 48 "WBOCXLib.Wbocx {55D94814-5664-4D04-9804-74DD038D4BA3} data:FF3B93B57DCD0595FDC248CD079B4CD6FEB4AEEC2770020B0DBA498E57D90EE6021BB8759574391802"
;1 Button 0x54030001 0x4 116 116 48 14 "OK"
;2 Button 0x54030000 0x4 168 116 48 14 "Cancel"
;END DIALOG
;DIALOG EDITOR: "" 0x2040701 "*" "" "" ""

if(!ShowDialog(dd &sub.DlgProc 0)) ret


#sub DlgProc
function# hDlg message wParam lParam

WBOCXLib.Wbocx- wb

sel message
,case WM_INITDIALOG
,if wb=0
,,wb._getcontrol(id(940 hDlg))
,,wb.SetRootPathStr(_s.expandpath("$pf$\Stardock\DirectSkin\samples\skins"))
,,wb.LoadUIS("dogmax\dogmax.uis")
,,wb.InitWB
,,;wb.SkinAllThreads()
,wb.DoWindow(hDlg)
,
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
ret 1

;BEGIN PROJECT
;main_function  dialog_DirectSkin
;END PROJECT

[stupomer]

That is so amazing!!!!
To change themes I had to close QM and restart. Ifigure it is writing to registry.
I will play around a bit more to see how to use it better after I register software - i.e. get rid of splashscreen, etc.
Very very very cool!!!
Thanks so much!,
Stuart