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方式顯示。