ciao a tutti
uso questa funzione trovata sul sito b4a
B4X:
Sub KillCall
Dim r As Reflector
r.Target = r.GetContext
Dim TelephonyManager, TelephonyInterface As Object
TelephonyManager = r.RunMethod2("getSystemService", "phone", "java.lang.String")
r.Target = TelephonyManager
TelephonyInterface = r.RunMethod("getITelephony")
r.Target = TelephonyInterface
r.RunMethod("endCall")
End Sub
do anche i permessi CALL_PHONE
ma non mi termina la chiamata in arrivo, cosa può essere...
grazie per l'aiuto