'#create pane
Dim p As Pane: p.initialize("ItemBBlbl")
p.PrefWidth=Width: p.prefheight = height
'# create label
BCT.Initialize(mBase)
Dim BBlbl As BBCodeView:
BBlbl.Initialize(mBase, "ItemBBLbl")
BBlbl.Text=Text '<-------- !
'# add BBlbl to pane
p.AddNode(BBlbl.tag,0,0,p.PrefWidth,p.PrefHeight)