object BackupDlg: TBackupDlg Left = 809 Height = 242 Top = 271 Width = 374 Caption = 'Backup Database' ClientHeight = 242 ClientWidth = 374 OnClose = FormClose OnShow = FormShow Position = poMainFormCenter LCLVersion = '1.8.1.0' object Bevel1: TBevel Left = 3 Height = 198 Top = 2 Width = 347 end object Label1: TLabel Left = 12 Height = 14 Top = 56 Width = 95 Caption = 'Database Name' ParentColor = False end object Label2: TLabel Left = 12 Height = 14 Top = 7 Width = 39 Caption = 'Server' ParentColor = False end object Edit1: TEdit Left = 12 Height = 24 Top = 24 Width = 180 ReadOnly = True TabOrder = 0 end object Edit2: TEdit Left = 12 Height = 24 Top = 72 Width = 296 TabOrder = 1 end object Label3: TLabel Left = 12 Height = 14 Top = 144 Width = 68 Caption = 'Backup File' ParentColor = False end object RadioButton1: TRadioButton Left = 12 Height = 22 Top = 112 Width = 93 Caption = 'Server Side' TabOrder = 2 end object RadioButton2: TRadioButton Left = 134 Height = 22 Top = 112 Width = 88 Caption = 'Client Side' Checked = True TabOrder = 3 TabStop = True end object Edit3: TEdit Left = 12 Height = 24 Top = 160 Width = 288 TabOrder = 4 end object SpeedButton1: TSpeedButton Left = 310 Height = 25 Top = 160 Width = 25 Glyph.Data = { 36040000424D3604000000000000360000002800000010000000100000000100 2000000000000004000064000000640000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 00002D88D8FF2D87D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88 D8FF2D88D8FF2D88D8FF2D87D8FF2D88D8FF2C86D8FF0000000000000000338E D9FFDCF0FAFFA7DDF4FF9EDBF4FF96DAF3FF8ED8F3FF86D7F3FF7FD4F2FF79D3 F2FF72D2F1FF6CD0F1FF69CFF1FFC2EAF8FF338ED9FF00000000000000003594 DAFFEFFAFEFFA1E9F9FF91E5F8FF81E1F7FF72DEF6FF63DAF5FF54D7F4FF47D3 F3FF39D0F2FF2ECDF1FF26CBF0FFCAF2FBFF3594DAFF0000000000000000369A DAFFF2FAFDFFB3EDFAFFA4E9F9FF95E6F8FF85E2F7FF76DEF6FF65DBF5FF57D7 F4FF49D4F3FF3BD1F2FF30CEF1FFCCF2FBFF3598DAFF000000000000000036A1 DAFFF6FCFEFFC8F2FCFFB9EFFBFFACECFAFF9CE8F9FF8BE3F7FF7CE0F6FF6CDC F6FF5DD9F5FF4FD6F4FF44D3F3FFD0F3FCFF359FDAFF000000000000000037A6 DAFFFEFFFFFFF8FDFFFFF6FDFFFFF5FCFFFFF3FCFEFFD8F6FCFF94E6F8FF85E3 F7FF76DFF6FF68DBF5FF5CD8F4FFD7F4FCFF35A4DAFF000000000000000035AB DAFFE8F6FBFF94D4EFFF88CEEEFF73C1E9FFC9E9F6FFF2FCFEFFF3FCFEFFF2FC FEFFF0FCFEFFEFFBFEFFEEFBFEFFFEFFFFFF36ABDAFF000000000000000036AA DAFFF1FAFDFF94DEF5FF93DCF4FF81D5F2FF6ACAEDFF6CCBEAFF85D3EFFF80D2 EFFF7AD0EFFF76CFEEFF72CFEEFFE9F7FBFF34AEDAFF000000000000000035AF DAFFF7FCFEFF8EE4F8FF91DEF5FF9FE0F5FFACE1F6FFEFFBFEFFF4FDFEFFF3FC FEFFF1FCFEFFEFFBFEFFEEFBFEFFFAFDFFFF36AFDAFF000000000000000036B3 DAFFFDFEFEFFFEFFFFFFFEFEFFFFFDFEFFFFFEFFFFFFEAF7FBFF6BC7E4FF6BC7 E3FF6BC7E3FF6BC7E3FF79CDE6FF74CAE5FF00000000000000000000000034B4 D9FF5EC2E1FF60C3E2FF60C3E2FF60C3E2FF5FC3E2FF3CB6DBFF000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000 } OnClick = SpeedButton1Click end object Button1: TButton Left = 96 Height = 25 Top = 208 Width = 75 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 5 end object Button2: TButton Left = 191 Height = 25 Top = 208 Width = 75 Cancel = True Caption = 'Cancel' 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|*.*' Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing, ofViewDetail] left = 309 top = 120 end end