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

Delphi XE5 for Android (四)-LMLPHP    Delphi XE5 for Android (四)-LMLPHP

 

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

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;

效果如下:

Delphi XE5 for Android (四)-LMLPHP  Delphi XE5 for Android (四)-LMLPHP

效果不错,并看出对汉字的支持挺好!

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

04-14 10:13