--- ibx/trunk/examples/isqlmonitor/MainForm.lfm	2018/04/16 09:24:55	208
+++ ibx/trunk/examples/isqlmonitor/MainForm.lfm	2018/03/14 12:48:51	209
@@ -10,7 +10,7 @@ object Form1: TForm1
   OnClose = FormClose
   OnShow = FormShow
   Position = poScreenCenter
-  LCLVersion = '1.8.0.4'
+  LCLVersion = '1.8.3.0'
   object Button1: TButton
     Left = 915
     Height = 25
@@ -512,7 +512,7 @@ object Form1: TForm1
     Text = 'None Specified'
   end
   object IBDatabase1: TIBDatabase
-    Connected = False
+    Connected = True
     CreateIfNotExists = False
     AllowStreamedConnected = False
     DatabaseName = 'localhost:employee'
@@ -588,8 +588,10 @@ object Form1: TForm1
     BeforeOpen = EmployeesBeforeOpen
     BufferChunks = 1000
     CachedUpdates = False
+    EnableStatistics = False
     GenerateParamNames = False
     GeneratorField.ApplyOnEvent = gaeOnNewRecord
+    MasterDetailDelay = 0
     SQL.Strings = (
       'Select sum(Salary) as TotalSalaries'
       'From EMPLOYEE'
@@ -629,11 +631,11 @@ object Form1: TForm1
     AfterInsert = EmployeesAfterInsert
     AfterOpen = EmployeesAfterOpen
     AfterPost = EmployeesAfterPost
-    AfterScroll = EmployeesAfterScroll
     BeforeClose = EmployeesBeforeClose
     BeforeOpen = EmployeesBeforeOpen
     BufferChunks = 1000
     CachedUpdates = False
+    EnableStatistics = False
     DeleteSQL.Strings = (
       'Delete From EMPLOYEE A'
       'Where A.EMP_NO = :EMP_NO'
@@ -694,6 +696,7 @@ object Form1: TForm1
     GeneratorField.Field = 'EMP_NO'
     GeneratorField.ApplyOnEvent = gaeOnNewRecord
     GenerateParamNames = False
+    MasterDetailDelay = 0
     DataSetCloseAction = dcSaveChanges
     AfterTransactionEnd = EmployeesAfterTransactionEnd
     OnValidatePost = EmployeesValidatePost
@@ -851,11 +854,13 @@ object Form1: TForm1
     AllowAutoActivateTransaction = False
     Database = IBDatabase1
     Transaction = IBTransaction1
-    BeforeOpen = CountriesBeforeOpen
     BufferChunks = 1000
     CachedUpdates = False
+    DataSource = EmployeeSource
+    EnableStatistics = False
     GenerateParamNames = False
     GeneratorField.ApplyOnEvent = gaeOnNewRecord
+    MasterDetailDelay = 250
     SQL.Strings = (
       'Select A.COUNTRY, A.CURRENCY From COUNTRY A'
       'JOIN JOB J On J.JOB_COUNTRY = A.COUNTRY'
@@ -897,11 +902,13 @@ object Form1: TForm1
     AllowAutoActivateTransaction = False
     Database = IBDatabase1
     Transaction = IBTransaction1
-    BeforeOpen = JobCodesBeforeOpen
     BufferChunks = 1000
     CachedUpdates = False
+    DataSource = EmployeeSource
+    EnableStatistics = False
     GenerateParamNames = False
     GeneratorField.ApplyOnEvent = gaeOnNewRecord
+    MasterDetailDelay = 250
     SQL.Strings = (
       'Select A.JOB_CODE, A.JOB_TITLE From JOB A'
       'Where JOB_COUNTRY = :JOB_COUNTRY and JOB_GRADE = :JOB_GRADE'
@@ -939,8 +946,10 @@ object Form1: TForm1
     Transaction = IBTransaction1
     BufferChunks = 1000
     CachedUpdates = False
+    EnableStatistics = False
     GenerateParamNames = False
     GeneratorField.ApplyOnEvent = gaeOnNewRecord
+    MasterDetailDelay = 0
     SQL.Strings = (
       'Select A.DEPT_NO, A.DEPARTMENT From DEPARTMENT A'
       ''