Delphi XE5 for Android （四）

在Delphi中窗体与窗体之间的交互与调用非常简单，在FMX中这个优势得到了充分体现，先建立一个主窗体和一个需要调用的窗体：

   

 

在主窗体上放的按钮事件如下：

…

private
  { Private declarations }

  //定义私有窗体对象
  Ffrm: TfrmOtherFMX;

…

procedure TfrmMainFMX.Button1Click(Sender: TObject);
begin

  //创建并显示窗体
  if not Assigned(Ffrm) then
    Ffrm := TfrmOtherFMX.Create(Self);
  Ffrm.Show;
end;

在另外一个窗体的按钮事件中关闭：

procedure TfrmOtherFMX.Button1Click(Sender: TObject);
begin
  Close;
end;

效果如下：

 

效果不错，并看出对汉字的支持挺好！

需要注意的是：FMX不再允许窗体的Modal模式，也就是说窗体都不能通过ShowModal方式显示。