ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/lookupcombobox/Unit1.lfm
(Generate patch)

Comparing ibx/trunk/examples/lookupcombobox/Unit1.lfm (file contents):
Revision 224 by tony, Mon Jan 1 11:31:07 2018 UTC vs.
Revision 225 by tony, Tue Apr 3 09:09:05 2018 UTC

# Line 10 | Line 10 | object Form1: TForm1
10    OnClose = FormClose
11    OnShow = FormShow
12    Position = poScreenCenter
13 <  LCLVersion = '1.8.1.0'
13 >  LCLVersion = '1.8.3.0'
14    object Label1: TLabel
15      Left = 16
16      Height = 14
# Line 31 | Line 31 | object Form1: TForm1
31      LookupCache = False
32      ScrollListDataset = True
33      TabOrder = 0
34 <    AutoInsert = True
35 <    AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
34 >    AutoInsert = False
35 >    AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
36      ItemHeight = 0
37      KeyPressInterval = 600
38      OnCanAutoInsert = IBLookupComboEditBox1CanAutoInsert
# Line 334 | Line 334 | object Form1: TForm1
334      AfterPost = EmployeesAfterPost
335      BufferChunks = 1000
336      CachedUpdates = False
337 +    EnableStatistics = False
338      DeleteSQL.Strings = (
339        'Execute Procedure DELETE_EMPLOYEE :EMP_NO'
340      )
# Line 390 | Line 391 | object Form1: TForm1
391      GeneratorField.Field = 'EMP_NO'
392      GeneratorField.ApplyOnEvent = gaeOnNewRecord
393      GenerateParamNames = False
394 +    MasterDetailDelay = 0
395      DataSetCloseAction = dcSaveChanges
396      AfterTransactionEnd = EmployeesAfterTransactionEnd
397      left = 376
# Line 561 | Line 563 | object Form1: TForm1
563      BeforeOpen = CountriesBeforeOpen
564      BufferChunks = 1000
565      CachedUpdates = False
566 +    EnableStatistics = False
567      GenerateParamNames = False
568      GeneratorField.ApplyOnEvent = gaeOnNewRecord
569 +    MasterDetailDelay = 0
570      SQL.Strings = (
571        'Select A.COUNTRY, A.CURRENCY From COUNTRY A'
572        'JOIN JOB J On J.JOB_COUNTRY = A.COUNTRY'
# Line 606 | Line 610 | object Form1: TForm1
610      BeforeOpen = JobCodesBeforeOpen
611      BufferChunks = 1000
612      CachedUpdates = False
613 +    EnableStatistics = False
614      GenerateParamNames = False
615      GeneratorField.ApplyOnEvent = gaeOnNewRecord
616 +    MasterDetailDelay = 0
617      SQL.Strings = (
618        'Select distinct A.JOB_CODE, A.JOB_TITLE From JOB A'
619        'Where JOB_GRADE = :JOB_GRADE'

Diff Legend

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