Make sure the Customers master table is opened

Author: davidberneda

demos/FireMonkey/Database/Master_Detail_FireDAC/Master_Detail_FireDAC.fmx

@@ -11,53 +11,7 @@ object MasterDetail: TMasterDetail
   OnCreate = FormCreate
   DesignerMasterStyle = 0
   object TeeGrid1: TTeeGrid
-    Columns = <
-      item
-        Format.Font.Style = [fsBold]
-        Header.Text = 'CustomerID'
-        ParentFormat = False
-        Link = 'CustomerID'
-      end
-      item
-        Header.Text = 'CompanyName'
-        Link = 'CompanyName'
-      end
-      item
-        Header.Text = 'ContactName'
-        Link = 'ContactName'
-      end
-      item
-        Header.Text = 'ContactTitle'
-        Link = 'ContactTitle'
-      end
-      item
-        Header.Text = 'Address'
-        Link = 'Address'
-      end
-      item
-        Header.Text = 'City'
-        Link = 'City'
-      end
-      item
-        Header.Text = 'Region'
-        Link = 'Region'
-      end
-      item
-        Header.Text = 'PostalCode'
-        Link = 'PostalCode'
-      end
-      item
-        Header.Text = 'Country'
-        Link = 'Country'
-      end
-      item
-        Header.Text = 'Phone'
-        Link = 'Phone'
-      end
-      item
-        Header.Text = 'Fax'
-        Link = 'Fax'
-      end>
+    Columns = <>
     Align = Client
     Size.Width = 817.000000000000000000
     Size.Height = 554.000000000000000000

demos/FireMonkey/Database/Master_Detail_FireDAC/Master_Detail_FireDAC.pas

@@ -61,6 +61,8 @@ implementation
 
 procedure TMasterDetail.FormCreate(Sender: TObject);
 begin
+  SampleData.CustomersTable.Open;
+
   TeeGrid1.DataSource:=SampleData.CustomersTable;
 
   Open := False;
@@ -75,8 +77,7 @@ procedure TMasterDetail.FormCreate(Sender: TObject);
 // Optional. Called when a new detail sub-grid has been created
 procedure TMasterDetail.Button1Click(Sender: TObject);
 begin
-
-  if Open = True then
+  if Open then
   Begin
     TeeGrid1.Grid.Current.ShowHideAllDetail(0,False);
     Open:= False;
@@ -86,7 +87,6 @@ procedure TMasterDetail.Button1Click(Sender: TObject);
     TeeGrid1.Grid.Current.ShowHideAllDetail(0,True);
     Open:= True;
   End;
-
 end;
 
 procedure TMasterDetail.CBEnabledChange(Sender: TObject);