Dim sf As Object = prefdialog.ShowDialog(Options1, "OK", "Cancelar")
'Hide confirm/cancel icons from MultiLine items
For i = 0 To prefdialog.PrefItems.Size - 1
Dim pi As B4XPrefItem = prefdialog.PrefItems.Get(i)
prefdialog.CustomListView1.AnimationDuration = 0
If pi.ItemType = prefdialog.TYPE_MULTILINETEXT Then
Dim pnl As B4XView = prefdialog.CustomListView1.GetPanel(i)
Dim ft As B4XFloatTextField = pnl.GetView(0).Tag
ft.lblClear.Left = -100dip
ft.lblV.Left = -100dip
End If
Next
Wait For (sf) Complete (Result As Int)