WinBlitz3D Styles

Blitz3D Forums/Blitz3D Userlibs/WinBlitz3D Styles

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

This may point you in the right direction.
You have to learn about Windows flags since yu're now working with the Windows GUI.
;------------------------------------------
Function JTextLabel(txt$, x,y,w,h, parent, fnt, r,g,b)
;------------------------------------------
Local label, exstyle, style

	exstyle = WS_EX_TRANSPARENT
	style = WS_CHILD Or WS_VISIBLE Or ES_CENTER Or ES_READONLY

	label = WB3D_CreateTextArea(x+1,y+1,w,h, parent,style)
	WB3D_Usefont(label, fnt)
	WB3D_SetGadgetExtendedStyle label,exstyle
	WB3D_SetTextAreaColor(label,255,255,255)
	WB3D_SetGadgetText(label,txt$)

	label = WB3D_CreateTextArea(x,y,w,h, parent,style)
	WB3D_Usefont(label, fnt)
	WB3D_SetGadgetExtendedStyle label,exstyle
	WB3D_SetTextAreaColor(label,r,g,b)
	WB3D_SetGadgetText(label,txt$)

Return label
End Function