I did try this code, but it does not work, can someone please leadme how to do it?
B4X:
Dim Input As B4XInputTemplate
dim dialogx as b4xdialog
dialogx.Initialize(MainForm.RootPane)
Input.lblTitle.Text ="Name of New Folder"
dialogx.Title = "Enter"
Wait For (dialogx.ShowTemplate(Input, "OK", "", "Cancel")) Complete (Result As String)
If Result = xui.DialogResponse_Positive Then
Log(Input.TextField1.Text)
End If
In the absence of "why didn't it work?" No error or nothing.
But the line "dialogx as b4xdialog" is incomplete. How about "Dim dialogx As B4XDialog"
Since "as" is in lower case the code you posted is not from an App.