My application is working on most devices but without a hitch on my own does not work the call option since it returns me error the following line
I included the catch error that google play offers me
B4X:
ub LLAMAR (Numero As String,Nombre As String,Domicilio As String )
Dim ph As Phone
Dim bd As BitmapDrawable
Dim tmpValue As String
bd = ph.GetResourceDrawable(17301659)'17301659 = ic_dialog_info
tmpValue="Teléfono: " & Numero & CRLF & "Nombre: " & Nombre & CRLF & "Domicilio: " & Domicilio
If Numero = "" Then
ToastMessageShow("Número no válido", False)
Return
End If
result=Msgbox2(tmpValue,"","Llamar","Cancelar","",bd.Bitmap)
If result=DialogResponse.POSITIVE Then
SendCall (Numero)
Else
'Msgbox("NO HACER NADA","")
End If
End Sub
Sub SendCall(PhoneNumber As String)
Dim p As PhoneCalls
StartActivity(p.Call(PhoneNumber))
End Sub
I included the catch error that google play offers me