Library Function

BlitzMax Forums/BlitzMax Programming/Library Function

fredborg
 #1
SuperStrict

Extern 
	Function InitCommonControlsEx:Int(lpInitCtrls:Byte Ptr)="InitCommonControlsEx@4"
End Extern

Global InitControls : TINITCOMMONCONTROLSEX

InitControls = New TINITCOMMONCONTROLSEX
InitControls.dwSize = SizeOf(TINITCOMMONCONTROLSEX)
InitControls.dwICC  = ICC_BAR_CLASSES ..
                      | ICC_PROGRESS_CLASS ..
                      | ICC_TREEVIEW_CLASSES

Print InitCommonControlsEx(InitControls)