Sub ShowDialog
Dim p As B4XView = xui.CreatePanel("")
p.SetLayoutAnimated(0, 0, 0, 600dip, 620dip)
p.LoadLayout("test")
Dialog.Initialize(MainForm.RootPane)
Dialog.BackgroundColor = xui.Color_LightGray ' fx.Colors.To32Bit(fx.Colors.LightGray)
Dim rs As ResumableSub = Dialog.ShowCustom(p, "", "", "Done")
Sleep(0)
Pane2.Top = Pane1.top + Pane1.Height + 10dip ' <<<< Issue: Pane2 isn't moving...
Label1.Left = 150dip ' <<<< ... and neither is Label1
Wait For (rs) Complete(Result As Int)
End Sub