--- ibx/trunk/examples/services/BackupDlgUnit.lfm	2018/04/16 09:24:55	208
+++ ibx/trunk/examples/services/BackupDlgUnit.lfm	2018/03/14 12:48:51	209
@@ -1,7 +1,7 @@
 object BackupDlg: TBackupDlg
-  Left = 809
+  Left = 714
   Height = 242
-  Top = 271
+  Top = 224
   Width = 374
   Caption = 'Backup Database'
   ClientHeight = 242
@@ -9,7 +9,7 @@ object BackupDlg: TBackupDlg
   OnClose = FormClose
   OnShow = FormShow
   Position = poMainFormCenter
-  LCLVersion = '1.8.1.0'
+  LCLVersion = '1.8.3.0'
   object Bevel1: TBevel
     Left = 3
     Height = 198
@@ -32,7 +32,7 @@ object BackupDlg: TBackupDlg
     Caption = 'Server'
     ParentColor = False
   end
-  object Edit1: TEdit
+  object ServerName: TEdit
     Left = 12
     Height = 24
     Top = 24
@@ -40,7 +40,7 @@ object BackupDlg: TBackupDlg
     ReadOnly = True
     TabOrder = 0
   end
-  object Edit2: TEdit
+  object DBName: TEdit
     Left = 12
     Height = 24
     Top = 72
@@ -55,7 +55,7 @@ object BackupDlg: TBackupDlg
     Caption = 'Backup File'
     ParentColor = False
   end
-  object RadioButton1: TRadioButton
+  object ServerSideBtn: TRadioButton
     Left = 12
     Height = 22
     Top = 112
@@ -63,7 +63,7 @@ object BackupDlg: TBackupDlg
     Caption = 'Server Side'
     TabOrder = 2
   end
-  object RadioButton2: TRadioButton
+  object ClientSideBtn: TRadioButton
     Left = 134
     Height = 22
     Top = 112
@@ -73,7 +73,7 @@ object BackupDlg: TBackupDlg
     TabOrder = 3
     TabStop = True
   end
-  object Edit3: TEdit
+  object BackupFilename: TEdit
     Left = 12
     Height = 24
     Top = 160
@@ -143,23 +143,6 @@ object BackupDlg: TBackupDlg
     ModalResult = 2
     TabOrder = 6
   end
-  object IBBackupService1: TIBBackupService
-    ServerName = 'localhost'
-    Protocol = TCP
-    Params.Strings = (
-      'user_name=SYSDBA'
-      ''
-    )
-    TraceFlags = []
-    Verbose = True
-    StatisticsRequested = [bsTotalTime]
-    BackupFileLocation = flClientSide
-    BlockingFactor = 0
-    DatabaseName = 'employee'
-    Options = [NoDBTriggers]
-    left = 312
-    top = 24
-  end
   object SaveDialog1: TSaveDialog
     DefaultExt = '.gbk'
     Filter = 'Backup Files|*.gbk|All Files|*.*'
@@ -167,4 +150,23 @@ object BackupDlg: TBackupDlg
     left = 309
     top = 120
   end
+  object CSBackupService1: TIBXClientSideBackupService
+    ServicesConnection = MainForm.IBXServicesConnection1
+    TraceFlags = []
+    BlockingFactor = 0
+    Options = [NoDBTriggers]
+    left = 133
+    top = 14
+  end
+  object SSBackupService1: TIBXServerSideBackupService
+    ServicesConnection = MainForm.IBXServicesConnection1
+    TraceFlags = []
+    OnGetNextLine = SSBackupService1GetNextLine
+    BlockingFactor = 0
+    Options = [NoDBTriggers]
+    StatisticsRequested = [bsTotalTime]
+    Verbose = True
+    left = 272
+    top = 16
+  end
 end