该代码使用Delphi XE6的FireMonkey移动应用程序获取Android终端的屏幕信息。

Android_Display_Delphi

uses

  Androidapi.JNI.GraphicsContentViewText,

  Androidapi.JNI.Util,

  FMX.Helpers.Android;

procedure TForm1.Button1Click(Sender: TObject);

var

  Display: JDisplay;

  DisplayMetrics: JDisplayMetrics;

begin

  Display := GetJDisplay();

  DisplayMetrics := GetJDisplayMetrics();

  Display.getMetrics(DisplayMetrics);

  Memo1.Lines.Add(Format('Display.getWidth = %d', [Display.getWidth]));

  Memo1.Lines.Add(Format('Display.getHeight = %d', [Display.getHeight]));

  Memo1.Lines.Add(Format('Display.getOrientation = %d', [Display.getOrientation]));

  Memo1.Lines.Add(Format('Display.getRefreshRate = %f', [Display.getRefreshRate]));

  Memo1.Lines.Add(Format('Display.getPixelFormat = %d', [Display.getPixelFormat]));

  Memo1.Lines.Add(Format('DisplayMetrics.xdpi(画面x轴方向每英寸准确的物理像素数) = %f', [DisplayMetrics.xdpi]));

  Memo1.Lines.Add(Format('DisplayMetrics.ydpi(画面y轴方向每英寸准确的物理像素数) = %f', [DisplayMetrics.ydpi]));

  Memo1.Lines.Add(Format('DisplayMetrics.widthPixels(显示器的绝对宽度) = %d', [DisplayMetrics.widthPixels]));

  Memo1.Lines.Add(Format('DisplayMetrics.heightPixels(像素显示器的绝对高度) = %d', [DisplayMetrics.heightPixels]));

  Memo1.Lines.Add(Format('DisplayMetrics.density(显示器逻辑密度) = %f', [DisplayMetrics.density]));

  Memo1.Lines.Add(Format('DisplayMetrics.density(用每英寸点数表示的画面密度) = %d', [DisplayMetrics.densityDpi]));

  Memo1.Lines.Add(Format('DisplayMetrics.scaledDensity(显示在显示器上的字体显示比例) = %f',s [DisplayMetrics.scaledDensity]));

end;