ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/examples/employee/unit1.lfm

Comparing ibx/trunk/examples/employee/unit1.lfm (file contents):
Revision 401 by tony, Mon Jan 10 10:13:17 2022 UTC vs.
Revision 402 by tony, Mon Aug 1 10:07:24 2022 UTC

#	Line 10 | Line 10 | object Form1: TForm1
10		OnClose = FormClose
11		OnShow = FormShow
12		Position = poMainFormCenter
13	<	LCLVersion = '2.0.11.0'
13	>	LCLVersion = '2.2.0.2'
14		object Button1: TButton
15		Left = 845
16		Height = 25
#	Line 40 | Line 40 | object Form1: TForm1
40		end
41		object Label1: TLabel
42		Left = 17
43	<	Height = 13
43	>	Height = 15
44		Top = 14
45		Width = 87
46		Caption = 'Started Before'
47	–	ParentColor = False
47		end
48		object BeforeDate: TDateEdit
49		Left = 112
#	Line 61 | Line 60 | object Form1: TForm1
60		end
61		object Label2: TLabel
62		Left = 241
63	<	Height = 13
63	>	Height = 15
64		Top = 14
65		Width = 78
66		Caption = 'Started After'
68	–	ParentColor = False
67		end
68		object AfterDate: TDateEdit
69		Left = 333
#	Line 232 | Line 230 | object Form1: TForm1
230		Anchors = [akTop, akLeft, akBottom]
231		DataField = 'TOTALSALARIES'
232		DataSource = TotalsSource
235	–	ParentColor = False
233		end
234		end
235		object EmployeeEditorPanel: TPanel
#	Line 251 | Line 248 | object Form1: TForm1
248		Visible = False
249		object Label3: TLabel
250		Left = 0
251	<	Height = 13
251	>	Height = 15
252		Top = 7
253		Width = 83
254		Caption = 'Employee No.'
258	–	ParentColor = False
255		end
256		object DBEdit1: TDBEdit
257		Left = 90
#	Line 264 | Line 260 | object Form1: TForm1
260		Width = 120
261		DataField = 'EMP_NO'
262		DataSource = EmployeeSource
267	–	CharCase = ecNormal
263		MaxLength = 0
264		TabOrder = 0
265		end
266		object Label4: TLabel
267		Left = 12
268	<	Height = 13
268	>	Height = 15
269		Top = 32
270		Width = 64
271		Caption = 'First Name'
277	–	ParentColor = False
272		end
273		object DBEdit2: TDBEdit
274		Left = 90
#	Line 283 | Line 277 | object Form1: TForm1
277		Width = 120
278		DataField = 'FIRST_NAME'
279		DataSource = EmployeeSource
286	–	CharCase = ecNormal
280		MaxLength = 0
281		TabOrder = 1
282		end
283		object Label5: TLabel
284		Left = 12
285	<	Height = 13
285	>	Height = 15
286		Top = 56
287		Width = 64
288		Caption = 'Last Name'
296	–	ParentColor = False
289		end
290		object DBEdit3: TDBEdit
291		Left = 90
#	Line 302 | Line 294 | object Form1: TForm1
294		Width = 120
295		DataField = 'LAST_NAME'
296		DataSource = EmployeeSource
305	–	CharCase = ecNormal
297		MaxLength = 0
298		TabOrder = 2
299		end
300		object Label6: TLabel
301		Left = 216
302	<	Height = 13
302	>	Height = 15
303		Top = 7
304		Width = 77
305		Caption = 'Date Started'
315	–	ParentColor = False
306		end
307		object IBDateEdit1: TDBDateEdit
308		Left = 300
#	Line 331 | Line 321 | object Form1: TForm1
321		end
322		object Label7: TLabel
323		Left = 252
324	<	Height = 13
324	>	Height = 15
325		Top = 32
326		Width = 37
327		Caption = 'Salary'
338	–	ParentColor = False
328		end
329		object DBEdit4: TDBEdit
330		Left = 300
#	Line 344 | Line 333 | object Form1: TForm1
333		Width = 104
334		DataField = 'SALARY'
335		DataSource = EmployeeSource
347	–	CharCase = ecNormal
336		MaxLength = 0
337		TabOrder = 5
338		end
339		object Label8: TLabel
340		Left = 708
341	<	Height = 13
341	>	Height = 15
342		Top = 54
343		Width = 24
344		Anchors = [akTop, akRight]
345		Caption = 'Ext.'
358	–	ParentColor = False
346		end
347		object DBEdit5: TDBEdit
348		Left = 732
#	Line 365 | Line 352 | object Form1: TForm1
352		DataField = 'PHONE_EXT'
353		DataSource = EmployeeSource
354		Anchors = [akTop, akRight]
368	–	CharCase = ecNormal
355		MaxLength = 0
356		TabOrder = 4
357		end
358		object Label9: TLabel
359		Left = 536
360	<	Height = 13
360	>	Height = 15
361		Top = 7
362		Width = 50
363		Caption = 'Location'
378	–	ParentColor = False
364		end
365		object Label10: TLabel
366		Left = 413
367	<	Height = 13
367	>	Height = 15
368		Top = 9
369		Width = 59
370		Caption = 'Job Grade'
386	–	ParentColor = False
371		end
372		object JobGradeDBComboBox: TDBComboBox
373		Left = 480
#	Line 408 | Line 392 | object Form1: TForm1
392		end
393		object Label11: TLabel
394		Left = 536
395	<	Height = 13
395	>	Height = 15
396		Top = 32
397		Width = 48
398		Caption = 'Job Title'
415	–	ParentColor = False
399		end
400		object Label12: TLabel
401		Left = 256
402	<	Height = 13
402	>	Height = 15
403		Top = 54
404		Width = 33
405		Caption = 'Dept.'
423	–	ParentColor = False
406		end
407		object SpeedButton1: TSpeedButton
408		Left = 680
#	Line 439 | Line 421 | object Form1: TForm1
421		DataSource = EmployeeSource
422		ReadOnly = True
423		Anchors = [akTop, akLeft, akRight]
442	–	CharCase = ecNormal
424		MaxLength = 0
425		TabOrder = 7
426		end
#	Line 487 | Line 468 | object Form1: TForm1
468		end
469		object Label13: TLabel
470		Left = 456
471	<	Height = 13
471	>	Height = 15
472		Top = 14
473		Width = 79
474		Caption = 'Salary Range'
494	–	ParentColor = False
475		end
476		object SalaryRange: TComboBox
477		Left = 544
#	Line 512 | Line 492 | object Form1: TForm1
492		Text = 'None Specified'
493		end
494		object IBDatabase1: TIBDatabase
495	<	Connected = True
495	>	Connected = False
496		CreateIfNotExists = False
497		AllowStreamedConnected = False
498		DatabaseName = 'localhost:employee'

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines