source: trunk/Forms/UFormMain.lfm

Last change on this file was 22, checked in by chronos, 13 years ago
  • Upraveno: Příprava pro zobrazování seznamu operací.
File size: 6.2 KB
Line 
1object FormMain: TFormMain
2 Left = 357
3 Height = 513
4 Top = 122
5 Width = 602
6 Caption = 'FioInfo'
7 ClientHeight = 513
8 ClientWidth = 602
9 OnClose = FormClose
10 OnCreate = FormCreate
11 OnShow = FormShow
12 Position = poScreenCenter
13 LCLVersion = '1.1'
14 object ButtonSettings: TButton
15 Left = 454
16 Height = 25
17 Top = 481
18 Width = 112
19 Action = Core.ASettings
20 Anchors = [akBottom]
21 TabOrder = 0
22 end
23 object GroupBox1: TGroupBox
24 Left = 16
25 Height = 57
26 Top = 250
27 Width = 581
28 Anchors = [akLeft, akRight, akBottom]
29 Caption = 'New transaction from last check'
30 ClientHeight = 39
31 ClientWidth = 577
32 TabOrder = 1
33 object ButtonNew: TButton
34 Left = 358
35 Height = 25
36 Top = 7
37 Width = 112
38 Caption = 'Download'
39 OnClick = ButtonNewClick
40 TabOrder = 0
41 end
42 object Label7: TLabel
43 Left = 6
44 Height = 13
45 Top = 12
46 Width = 35
47 Caption = 'Last id:'
48 ParentColor = False
49 end
50 object SpinEditLastId: TSpinEdit
51 Left = 70
52 Height = 21
53 Top = 7
54 Width = 96
55 MaxValue = 1000000000
56 TabOrder = 1
57 end
58 end
59 object GroupBox2: TGroupBox
60 Left = 17
61 Height = 72
62 Top = 316
63 Width = 581
64 Anchors = [akLeft, akRight, akBottom]
65 Caption = 'Transactions from defined time interval'
66 ClientHeight = 54
67 ClientWidth = 577
68 TabOrder = 2
69 object ButtonInterval: TButton
70 Left = 358
71 Height = 25
72 Top = 7
73 Width = 112
74 Caption = 'Download'
75 OnClick = ButtonIntervalClick
76 TabOrder = 0
77 end
78 object DateEditStart: TDateEdit
79 Left = 54
80 Height = 21
81 Top = 7
82 Width = 80
83 CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames]
84 OnAcceptDate = DateEditStartAcceptDate
85 OKCaption = 'OK'
86 CancelCaption = 'Cancel'
87 DateOrder = doNone
88 ButtonWidth = 23
89 CharCase = ecNormal
90 NumGlyphs = 1
91 MaxLength = 0
92 TabOrder = 1
93 end
94 object DateEditTo: TDateEdit
95 Left = 238
96 Height = 21
97 Top = 7
98 Width = 80
99 CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames]
100 OnAcceptDate = DateEditToAcceptDate
101 OKCaption = 'OK'
102 CancelCaption = 'Cancel'
103 DateOrder = doNone
104 ButtonWidth = 23
105 CharCase = ecNormal
106 NumGlyphs = 1
107 MaxLength = 0
108 TabOrder = 2
109 end
110 object Label1: TLabel
111 Left = 6
112 Height = 13
113 Top = 12
114 Width = 28
115 Caption = 'From:'
116 ParentColor = False
117 end
118 object Label4: TLabel
119 Left = 174
120 Height = 13
121 Top = 12
122 Width = 16
123 Caption = 'To:'
124 ParentColor = False
125 end
126 end
127 object GroupBox3: TGroupBox
128 Left = 16
129 Height = 65
130 Top = 412
131 Width = 582
132 Anchors = [akLeft, akRight, akBottom]
133 Caption = 'Selected mothly report'
134 ClientHeight = 47
135 ClientWidth = 578
136 TabOrder = 3
137 object ButtonMonthly: TButton
138 Left = 358
139 Height = 25
140 Top = 7
141 Width = 112
142 Caption = 'Download'
143 OnClick = ButtonMonthlyClick
144 TabOrder = 0
145 end
146 object SpinEditYear: TSpinEdit
147 Left = 54
148 Height = 21
149 Top = 7
150 Width = 96
151 MaxValue = 9999
152 MinValue = 1000
153 TabOrder = 1
154 Value = 2000
155 end
156 object SpinEditId: TSpinEdit
157 Left = 238
158 Height = 21
159 Top = 7
160 Width = 96
161 MaxValue = 12
162 MinValue = 1
163 TabOrder = 2
164 Value = 1
165 end
166 object Label2: TLabel
167 Left = 6
168 Height = 13
169 Top = 12
170 Width = 26
171 Caption = 'Year:'
172 ParentColor = False
173 end
174 object Label3: TLabel
175 Left = 174
176 Height = 13
177 Top = 12
178 Width = 41
179 Caption = 'Number:'
180 ParentColor = False
181 end
182 end
183 object ButtonExit: TButton
184 Left = 16
185 Height = 25
186 Top = 481
187 Width = 112
188 Action = Core.AExit
189 Anchors = [akLeft, akBottom]
190 TabOrder = 4
191 end
192 object ButtonAbout: TButton
193 Left = 136
194 Height = 25
195 Top = 481
196 Width = 112
197 Action = Core.AAbout
198 Anchors = [akLeft, akBottom]
199 TabOrder = 5
200 end
201 object Label5: TLabel
202 Left = 16
203 Height = 13
204 Top = 12
205 Width = 43
206 Caption = 'Account:'
207 ParentColor = False
208 end
209 object ComboBoxAccounts: TComboBox
210 Left = 96
211 Height = 21
212 Top = 8
213 Width = 395
214 Anchors = [akTop, akLeft, akRight]
215 ItemHeight = 13
216 OnChange = ComboBoxAccountsChange
217 Style = csDropDownList
218 TabOrder = 6
219 end
220 object ButtonNew1: TButton
221 Left = 499
222 Height = 25
223 Top = 8
224 Width = 88
225 Anchors = [akTop, akRight]
226 Caption = 'Edit'
227 OnClick = ButtonNew1Click
228 TabOrder = 7
229 end
230 object GroupBox4: TGroupBox
231 Left = 16
232 Height = 197
233 Top = 48
234 Width = 581
235 Anchors = [akTop, akLeft, akRight, akBottom]
236 Caption = 'Account state'
237 ClientHeight = 179
238 ClientWidth = 577
239 TabOrder = 8
240 object Label6: TLabel
241 Left = 14
242 Height = 13
243 Top = 7
244 Width = 41
245 Caption = 'Balance:'
246 ParentColor = False
247 end
248 object LabelBalance: TLabel
249 Left = 110
250 Height = 13
251 Top = 7
252 Width = 9
253 Caption = ' '
254 ParentColor = False
255 end
256 object ButtonGetState: TButton
257 Left = 358
258 Height = 25
259 Top = -1
260 Width = 112
261 Caption = 'Get'
262 OnClick = ButtonGetStateClick
263 TabOrder = 0
264 end
265 object ListViewOperation: TListView
266 Left = 6
267 Height = 145
268 Top = 32
269 Width = 561
270 Anchors = [akTop, akLeft, akRight, akBottom]
271 Columns = <
272 item
273 Caption = 'Id'
274 end
275 item
276 Caption = 'Date'
277 Width = 80
278 end
279 item
280 Caption = 'Account'
281 Width = 80
282 end
283 item
284 Caption = 'Value'
285 Width = 80
286 end
287 item
288 Caption = 'Var. sym.'
289 Width = 70
290 end
291 item
292 Caption = 'Spec. sym.'
293 end
294 item
295 Caption = 'Const. sym.'
296 Width = 134
297 end>
298 OwnerData = True
299 ReadOnly = True
300 RowSelect = True
301 TabOrder = 1
302 ViewStyle = vsReport
303 OnData = ListViewOperationData
304 end
305 end
306end
Note: See TracBrowser for help on using the repository browser.