• 136
    0

    Delphi Android internal system related operations (Cell phone information, vibration, clipboard, keyboard, phone, dialing) //Get phone information function GetPhoneInfo(): string; Var   TelephonyManager: JTelephonyManager;   TelephonyServiceNative: JObject; begin   result := ”;   TelephonyServiceNative := SharedActivityContext.getSystemService     (TJContext.JavaClass.TELEPHONY_SERVICE);   if Assigned(TelephonyServiceNative) then     TelephonyManager := TJTelephonyManager.Wrap       ((TelephonyServiceNative as ILocalObject).GetObjectID);   ...