• 263
    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);   ...
  • 404
    0

    For example, when your computer is damaged by a game application, you want to produce a vibration effect. To use the Android vibrator in Delphi, use the Android Vibrator class. When using Android vibrator, you need to set permissions. Sample code Place two buttons on the form Press the button to vibrate for 500 milliseconds ...