XE7 里面添加自定义View

经过xe4,xe5,xe6 这么几个版本的磨合，易博龙终于在今年9月推出了统一的多平台开发版本-XE7.

经过最近几天的测试，非常不错。如果各位同学在做移动开发，强烈建议使用XE7. 前面几个版本可以忽略了。

由于xe7 在界面设计上使用了新的视图(View) 模式，通过主视图建立子视图.

这里系统预定义好了好多子视图。

但是许多同学可能需要其他尺寸的视图。

其实自定义其它尺寸试图的方法也很简单。

例如，我的手机的参数如下：

• Model = xalionPhone
• Diagonal (in) = 4.5 英寸
• Resolution = 720 x 1280 像素
• Pixel density = 326 ppi
• Css pixel ratio = xhdpi (2.0x)

我们需要建立一个包，如图：

然后在包里添加一个单元。

并在unit 里面输入以下代码：

unit Unit1;

interface

implementation

uses

  system.Devices, system.Types, system.SysUtils;

const
  ViewName = ‘xalionview‘; // The name of the view.

initialization

  TDeviceinfo.AddDevice(TDeviceinfo.TDeviceClass.Phone, ViewName,
    TSize.Create(1216, 684), TSize.Create(1216 div 2, 684 div 2), // MinPhysicalSize(max, min), MinLogicalSize(max, min)
    TSize.Create(1280, 720), TSize.Create(1280 div 2, 720 div 2), // MaxPhysicalSize(max,min), MaxLogicalSize(max,min)
    TOSVersion.TPlatform.pfAndroid, 326); //Select the platform and the pixel density.

finalization

  TDeviceinfo.RemoveDevice(ViewName); // To unregister the view after unistalling the package.

end.

最后编译并安装这个包。