Со свежей головой. В дополнение к предыдущим замечаниям. Ну понеслась...
Что это такое?
BroadcastReceiver.Add('android.intent.action.READ_PHONE_STATE');
Зачем это?
var
telephonyService: JObject;
telephonyManager: JTelephonyManager;
...
begin
outputResult:= #13#10;
telephonyService := TAndroidHelper.Context.getSystemService(TJContext.JavaClass.TELEPHONY_SERVICE);
telephonyManager := TJTelephonyManager.Wrap((telephonyService as ILocalObject).GetObjectID);
Где определение статуса? (EXTRA_STATE_RINGING)
В общем, я внёс некоторые правки в ваш код и всё работает, но далее только в раздел Ищу подрядчика или ищите того, кто вам бесплатно реализует вашу задачу (сомневаюсь, что такие найдутся).
Call2.zip