1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
object Form1: TForm1
Left = 697
Height = 325
Top = 382
Width = 482
Caption = 'Form1'
ClientHeight = 325
ClientWidth = 482
LCLVersion = '1.3'
object Button1: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
Left = 191
Height = 33
Top = 64
Width = 100
AutoSize = True
BorderSpacing.Top = 6
Caption = 'Simple report'
OnClick = Button1Click
TabOrder = 0
end
object CheckBox1: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
Height = 23
Top = 6
Width = 119
BorderSpacing.Around = 6
Caption = 'Show designer'
TabOrder = 1
end
object Button2: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Button1
AnchorSideTop.Side = asrBottom
Left = 130
Height = 33
Top = 103
Width = 222
AutoSize = True
BorderSpacing.Top = 6
Caption = 'Report with SQL DB and Firebird'
OnClick = Button2Click
TabOrder = 2
end
object CheckBox2: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 35
Width = 117
BorderSpacing.Around = 6
Caption = 'Modal preview'
Checked = True
Enabled = False
State = cbChecked
TabOrder = 3
end
object Button3: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Button2
AnchorSideTop.Side = asrBottom
Left = 181
Height = 33
Top = 142
Width = 120
AutoSize = True
BorderSpacing.Top = 6
Caption = 'Report with DBF'
OnClick = Button3Click
TabOrder = 4
end
object Button4: TButton
AnchorSideLeft.Control = Button1
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Button3
AnchorSideTop.Side = asrBottom
Left = 123
Height = 33
Top = 181
Width = 236
AutoSize = True
BorderSpacing.Top = 6
Caption = 'Import template from spreadsheet'
OnClick = Button4Click
TabOrder = 5
end
object frReport1: TfrReport
InitialZoom = pzDefault
Options = []
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
DataType = dtDataSet
left = 304
top = 24
end
object LR_IBConnection1: TLR_IBConnection
left = 344
top = 24
end
object lrTDbfData1: TlrTDbfData
left = 384
top = 24
end
object frDesigner1: TfrDesigner
left = 424
top = 24
end
object IBConnection1: TIBConnection
Connected = False
LoginPrompt = False
DatabaseName = 'employee'
KeepConnection = False
Password = 'masterkey'
Transaction = SQLTransaction1
UserName = 'sysdba'
CharSet = 'UTF8'
HostName = '127.0.0.1'
left = 424
top = 88
end
object SQLTransaction1: TSQLTransaction
Active = False
Database = IBConnection1
left = 424
top = 133
end
object lrOfficeImport1: TlrOfficeImport
left = 388
top = 202
end
end
|
