B4J Question B4XDialog resize not catching - what am I missing?

[walt61]

When the main form is resized, I'd like the B4XDialog to be resized as well. However, I have the impression it just moves so that it remains centered on the form, and its dimensions don't change? Test project attached, and thanks in advance for any tips!

 

[Erel]

1. The showing variable is not needed. Use dialog.Visible.

2. Dialog.Resize does indeed only center the dialog. I will add a comment about it.

You are looking for something like:

' Called from Main.Mainform_Resize
Public Sub Resize(width As Double, height As Double)
    If dialog1.Visible Then
        Dim dx = width - dialog1.Base.Width, dy = height - dialog1.Base.Height As Int
        For i = 0 To dialog1.Base.NumberOfViews - 2 'the last view is the content view
            Dim v As B4XView = dialog1.Base.GetView(i)
            v.Left = v.Left + dx
            v.Top = v.Top + dy
        Next
        dialog1.Base.SetLayoutAnimated(0, 0, 0, width, height)
        dialog1.Resize(width, height)
        Dim ContentPanel As B4XView = dialog1.Base.GetView(dialog1.Base.NumberOfViews - 1)
        ContentPanel.SetLayoutAnimated(0, 0, 0, width, height - dialog1.ButtonsHeight - 3dip)
    End If
End Sub

 

[walt61]

I'd never have thought it was that easy Thanks as always Erel ! (Also for tip 1.)

 

[Erel]

Added a comment about the last view.

 

[walt61]

Still having a problem and can't find the solution: when resizing, the dialog's titlebar disappears?

 

[Erel]

I think that it is a mistake to use B4XDialog for your use case. It only makes things more complicated. Use a regular panel and resize it however you need.

 

[walt61]

Too bad, but I'll look into that. Thanks for the hint Erel !