delphi for android 获取手机号

概述uses   System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,   FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,Androidapi.JNI.GraphicsContentViewText,    Androi

uses
  System.SysUtils,System.Types,System.UITypes,System.Classes,System.Variants,
  FMX.Types,FMX.Controls,FMX.Forms,FMX.Graphics,FMX.Dialogs,AndroIDAPI.JNI.GraphicsContentVIEwText,
   AndroIDAPI.JNIBrIDge,  AndroIDAPI.JNI.Telephony,AndroIDAPI.JNI.JavaTypes,
    FMX.Helpers.AndroID,FMX.StdCtrls;

type
  TForm1 = class(TForm)
    btn1: Tbutton;
    lbl1: TLabel;
    procedure btn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  TelephonyManager: JTelephonyManager;
  TelephonyServiceNative: JObject;

implementation

{$R *.fmx}

procedure TForm1.btn1Click(Sender: TObject);
begin
  TelephonyServiceNative := SharedActivityContext.getSystemService
    (TJContext.JavaClass.TELEPHONY_SERVICE);
  if Assigned(TelephonyServiceNative) then
    TelephonyManager := TJTelephonyManager.Wrap
      ((TelephonyServiceNative as ILocalObject).GetobjectID);
  lbl1.Text:=JstringToString(TelephonyManager.getline1Number);//取得手机号

end;

总结

以上是内存溢出为你收集整理的delphi for android 获取手机号全部内容，希望文章能够帮你解决delphi for android 获取手机号所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。