Dim sf As Object = Dialog.ShowTemplate(ListTemplate, "OK", "", "CANCEL")
For Each i As Int In Array(xui.DialogResponse_Positive, xui.DialogResponse_Cancel)
Dim b As B4XView = Dialog.GetButton(i)
b.Top = b.Top + 10dip
b.Height = 30dip
Next
Wait For (sf) Complete (Result As Int)
But now when i try to compile the app i get this error