examples/services/Unit2.lfm

object Form2: TForm2
  Left = 784
  Height = 257
  Top = 222
  Width = 374
  Caption = 'Backup Database'
  ClientHeight = 257
  ClientWidth = 374
  OnClose = FormClose
  OnShow = FormShow
  Position = poMainFormCenter
  LCLVersion = '1.6.0.4'
  object Bevel1: TBevel
    Left = 3
    Height = 209
    Top = 2
    Width = 347
  end
  object Label1: TLabel
    Left = 12
    Height = 15
    Top = 64
    Width = 95
    Caption = 'Database Name'
    ParentColor = False
  end
  object Label2: TLabel
    Left = 12
    Height = 15
    Top = 7
    Width = 39
    Caption = 'Server'
    ParentColor = False
  end
  object Edit1: TEdit
    Left = 12
    Height = 25
    Top = 24
    Width = 180
    ReadOnly = True
    TabOrder = 0
  end
  object Edit2: TEdit
    Left = 12
    Height = 25
    Top = 80
    Width = 296
    TabOrder = 1
  end
  object Label3: TLabel
    Left = 12
    Height = 15
    Top = 160
    Width = 68
    Caption = 'Backup File'
    ParentColor = False
  end
  object RadioButton1: TRadioButton
    Left = 12
    Height = 22
    Top = 122
    Width = 93
    Caption = 'Server Side'
    Checked = True
    TabOrder = 2
  end
  object RadioButton2: TRadioButton
    Left = 134
    Height = 22
    Top = 122
    Width = 88
    Caption = 'Client Side'
    TabOrder = 3
  end
  object Edit3: TEdit
    Left = 12
    Height = 25
    Top = 176
    Width = 288
    TabOrder = 4
  end
  object SpeedButton1: TSpeedButton
    Left = 310
    Height = 25
    Top = 176
    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 = 224
    Width = 75
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 5
  end
  object Button2: TButton
    Left = 191
    Height = 25
    Top = 224
    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
    BlockingFactor = 0
    DatabaseName = 'employee'
    Options = []
    left = 312
    top = 24
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.gbk'
    Filter = 'Backup Files|*.gbk|All Files|*.*'
    Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing, ofViewDetail]
    left = 309
    top = 143
  end
end
Revision:	45
Committed:	Tue Dec 6 10:33:46 2016 UTC (7 years, 4 months ago) by tony
File size:	4805 byte(s)
Log Message:	Committing updates for Release R2-0-0
#	User	Rev	Content
1	tony	45	object Form2: TForm2
2			Left = 784
3			Height = 257
4			Top = 222
5			Width = 374
6			Caption = 'Backup Database'
7			ClientHeight = 257
8			ClientWidth = 374
9			OnClose = FormClose
10			OnShow = FormShow
11			Position = poMainFormCenter
12			LCLVersion = '1.6.0.4'
13			object Bevel1: TBevel
14			Left = 3
15			Height = 209
16			Top = 2
17			Width = 347
18			end
19			object Label1: TLabel
20			Left = 12
21			Height = 15
22			Top = 64
23			Width = 95
24			Caption = 'Database Name'
25			ParentColor = False
26			end
27			object Label2: TLabel
28			Left = 12
29			Height = 15
30			Top = 7
31			Width = 39
32			Caption = 'Server'
33			ParentColor = False
34			end
35			object Edit1: TEdit
36			Left = 12
37			Height = 25
38			Top = 24
39			Width = 180
40			ReadOnly = True
41			TabOrder = 0
42			end
43			object Edit2: TEdit
44			Left = 12
45			Height = 25
46			Top = 80
47			Width = 296
48			TabOrder = 1
49			end
50			object Label3: TLabel
51			Left = 12
52			Height = 15
53			Top = 160
54			Width = 68
55			Caption = 'Backup File'
56			ParentColor = False
57			end
58			object RadioButton1: TRadioButton
59			Left = 12
60			Height = 22
61			Top = 122
62			Width = 93
63			Caption = 'Server Side'
64			Checked = True
65			TabOrder = 2
66			end
67			object RadioButton2: TRadioButton
68			Left = 134
69			Height = 22
70			Top = 122
71			Width = 88
72			Caption = 'Client Side'
73			TabOrder = 3
74			end
75			object Edit3: TEdit
76			Left = 12
77			Height = 25
78			Top = 176
79			Width = 288
80			TabOrder = 4
81			end
82			object SpeedButton1: TSpeedButton
83			Left = 310
84			Height = 25
85			Top = 176
86			Width = 25
87			Glyph.Data = {
88			36040000424D3604000000000000360000002800000010000000100000000100
89			2000000000000004000064000000640000000000000000000000000000000000
90			0000000000000000000000000000000000000000000000000000000000000000
91			0000000000000000000000000000000000000000000000000000000000000000
92			0000000000000000000000000000000000000000000000000000000000000000
93			0000000000000000000000000000000000000000000000000000000000000000
94			00002D88D8FF2D87D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88
95			D8FF2D88D8FF2D88D8FF2D87D8FF2D88D8FF2C86D8FF0000000000000000338E
96			D9FFDCF0FAFFA7DDF4FF9EDBF4FF96DAF3FF8ED8F3FF86D7F3FF7FD4F2FF79D3
97			F2FF72D2F1FF6CD0F1FF69CFF1FFC2EAF8FF338ED9FF00000000000000003594
98			DAFFEFFAFEFFA1E9F9FF91E5F8FF81E1F7FF72DEF6FF63DAF5FF54D7F4FF47D3
99			F3FF39D0F2FF2ECDF1FF26CBF0FFCAF2FBFF3594DAFF0000000000000000369A
100			DAFFF2FAFDFFB3EDFAFFA4E9F9FF95E6F8FF85E2F7FF76DEF6FF65DBF5FF57D7
101			F4FF49D4F3FF3BD1F2FF30CEF1FFCCF2FBFF3598DAFF000000000000000036A1
102			DAFFF6FCFEFFC8F2FCFFB9EFFBFFACECFAFF9CE8F9FF8BE3F7FF7CE0F6FF6CDC
103			F6FF5DD9F5FF4FD6F4FF44D3F3FFD0F3FCFF359FDAFF000000000000000037A6
104			DAFFFEFFFFFFF8FDFFFFF6FDFFFFF5FCFFFFF3FCFEFFD8F6FCFF94E6F8FF85E3
105			F7FF76DFF6FF68DBF5FF5CD8F4FFD7F4FCFF35A4DAFF000000000000000035AB
106			DAFFE8F6FBFF94D4EFFF88CEEEFF73C1E9FFC9E9F6FFF2FCFEFFF3FCFEFFF2FC
107			FEFFF0FCFEFFEFFBFEFFEEFBFEFFFEFFFFFF36ABDAFF000000000000000036AA
108			DAFFF1FAFDFF94DEF5FF93DCF4FF81D5F2FF6ACAEDFF6CCBEAFF85D3EFFF80D2
109			EFFF7AD0EFFF76CFEEFF72CFEEFFE9F7FBFF34AEDAFF000000000000000035AF
110			DAFFF7FCFEFF8EE4F8FF91DEF5FF9FE0F5FFACE1F6FFEFFBFEFFF4FDFEFFF3FC
111			FEFFF1FCFEFFEFFBFEFFEEFBFEFFFAFDFFFF36AFDAFF000000000000000036B3
112			DAFFFDFEFEFFFEFFFFFFFEFEFFFFFDFEFFFFFEFFFFFFEAF7FBFF6BC7E4FF6BC7
113			E3FF6BC7E3FF6BC7E3FF79CDE6FF74CAE5FF00000000000000000000000034B4
114			D9FF5EC2E1FF60C3E2FF60C3E2FF60C3E2FF5FC3E2FF3CB6DBFF000000000000
115			0000000000000000000000000000000000000000000000000000000000000000
116			0000000000000000000000000000000000000000000000000000000000000000
117			0000000000000000000000000000000000000000000000000000000000000000
118			0000000000000000000000000000000000000000000000000000000000000000
119			0000000000000000000000000000000000000000000000000000000000000000
120			0000000000000000000000000000000000000000000000000000000000000000
121			0000000000000000000000000000000000000000000000000000
122			}
123			OnClick = SpeedButton1Click
124			end
125			object Button1: TButton
126			Left = 96
127			Height = 25
128			Top = 224
129			Width = 75
130			Caption = 'OK'
131			Default = True
132			ModalResult = 1
133			TabOrder = 5
134			end
135			object Button2: TButton
136			Left = 191
137			Height = 25
138			Top = 224
139			Width = 75
140			Cancel = True
141			Caption = 'Cancel'
142			ModalResult = 2
143			TabOrder = 6
144			end
145			object IBBackupService1: TIBBackupService
146			ServerName = 'localhost'
147			Protocol = TCP
148			Params.Strings = (
149			'user_name=SYSDBA'
150			)
151			TraceFlags = []
152			Verbose = True
153			BlockingFactor = 0
154			DatabaseName = 'employee'
155			Options = []
156			left = 312
157			top = 24
158			end
159			object SaveDialog1: TSaveDialog
160			DefaultExt = '.gbk'
161			Filter = 'Backup Files\|.gbk\|All Files\|.*'
162			Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing, ofViewDetail]
163			left = 309
164			top = 143
165			end
166			end