iOS Question Center vertically text in BBCodeView

asales

Expert
Licensed User
Longtime User
I come from this thread "Center vertically text in BBCodeView".
It works in B4A but not in B4i.

I just change to pass the parameter base, because I use the BBCodeView in a panel.
B4X: 
Private Sub SetBBCodeViewPosition(base As B4XView)
    If BBCodeView1.Paragraph.IsInitialized Then
        Dim ContentHeight As Int = Min(BBCodeView1.Paragraph.Height / TextEngine.mScale + BBCodeView1.Padding.Top + BBCodeView1.Padding.Bottom, BBCodeView1.mBase.Height)
        BBCodeView1.mBase.Height = ContentHeight
        BBCodeView1.mBase.Top = base.Height / 2 - ContentHeight / 2
    End If
End Sub

I don't found this option in BBCodeView.

How to make it works in B4i?

Thanks in advance for any tips.
 
Sort by date Sort by votes

William Lancee

Well-Known Member
Licensed User
Longtime User
I can't give you any hints on B4i, but instead of moving the base, I add a view (pane/panel) at the start of the page
and adjusts its height to where I want the text to start - this works for any vertical positioning.
 
Upvote 0

Erel

B4X founder
Staff member
Licensed User
Longtime User


Put the BBCodeView inside a panel.

B4X: 
Private Sub SetBBCodeViewPosition
    If BBCodeView1.Paragraph.IsInitialized Then
        Dim ContentHeight As Int = Min(BBCodeView1.Paragraph.Height / TextEngine.mScale + BBCodeView1.Padding.Top + BBCodeView1.Padding.Bottom, BBCodeView1.mBase.Height)
        BBCodeView1.mBase.Height = ContentHeight
        BBCodeView1.mBase.Top = BBCodeView1.mBase.Parent.Height / 2 - ContentHeight / 2
    End If
End Sub

Private Sub Panel1_Resize (Width As Float, Height As Float)
    SetBBCodeViewPosition
End Sub
 
Upvote 0
You must log in or register to reply here.
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…