Improvement in Repository sample

Author: danieleteti

samples/repository_showcase/MainFormU.dfm

@@ -28,8 +28,6 @@ object MainForm: TMainForm
     ReadOnly = True
     ScrollBars = ssBoth
     TabOrder = 0
-    ExplicitLeft = 0
-    ExplicitWidth = 884
   end
   object Panel1: TPanel
     Left = 0

samples/repository_showcase/MainFormU.pas

@@ -130,7 +130,7 @@ procedure TMainForm.LoadSampleData;
       lCustomer.City := Cities[Random(Length(Cities))];
       lCustomer.Rating := Random(5) + 1;
       lCustomer.Note := 'Sample customer ' + I.ToString;
-      lCustomer.Insert;
+      lRepo.Insert(lCustomer);
     finally
       lCustomer.Free;
     end;