Android Question B4XDialog ShowCustom

Sub btnCustom_Click
    Dim p As B4XView = xui.CreatePanel("")
    p.SetLayoutAnimated(0, 0, 0, 300dip, 150dip)
    p.LoadLayout("CustomDialog")
    p.Height=300dip
    dialog.PutAtTop = True
    Wait For (dialog.ShowCustom(p, "OK", "", "CANCEL")) Complete (Result As Int)
    If Result = xui.DialogResponse_Positive Then
        dialog.Show(fieldFirstName.Text & " " & fieldLastName.Text, "OK", "", "")
    End If
End Sub