ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/journaling/examples/employee/unit1.lfm
(Generate patch)
# Line 10 | Line 10
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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