本文整理自网络，侵删。
该代码使用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; 相关阅读 >>
Delphi html document接口获取网页中所有图片
Delphi tdirectory.getdirectories
Delphi 每年、月、周、日的开始与结束的时间startofayear … startoftheyear … endofayear … endoftheyear
Delphi代码，直截注入别的进程，之后直截运行在别的进程中的代码
更多相关阅读请进入《Delphi》频道 >>
