Berlin 10.1 Support

[iankrigsman]

Compile error in Berlin: Unit: Views.Main Line 123: if TPresentationState.Opened in MultiView1.Presenter.State then Error: "Undeclared identifier: Opened"

It appears TPresentationState is defined in both FMX.MultiView and FMX.Controls.Presentation, and the compiler is picking up the entry in FMX.Controls.Presentation. We want the MultiView definition.

Solution: Either qualify FMX.MultiView.TPresentationState or swap the unit names in the uses clause (Lines 12-13).

[rareMaxim]

Path:

procedure TViewMain.ListBox1ItemClick(const Sender: TCustomListBox;
  const Item: TListBoxItem);
begin
  if FMX.MultiView.TPresentationState.Opened in MultiView1.Presenter.State then
    MultiView1.HideMaster;
end;