home *** CD-ROM | disk | FTP | other *** search
/ Prima Shareware 3 / DuCom_Prima-Shareware-3_cd1.bin / PROGRAMO / delphi / ODA10 / _SETUP.1 / DemoFastFind.dfm / DemoFastFind.txt
Encoding:
Text File  |  1996-04-06  |  4.2 KB  |  210 lines
  1. object FormFastFind: TFormFastFind
  2.   Left = 278
  3.   Top = 162
  4.   Width = 486
  5.   Height = 483
  6.   Caption = 'DBControlGrid with fast Find'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   OnCreate = FormCreate
  12.   PixelsPerInch = 96
  13.   TextHeight = 13
  14.   object Label1: TLabel
  15.     Left = 292
  16.     Top = 352
  17.     Width = 171
  18.     Height = 39
  19.     Caption = 
  20.       'This lookup test shows the firstname to a given lastname using a' +
  21.       ' VCL method.'
  22.     Font.Color = clBlack
  23.     Font.Height = -11
  24.     Font.Name = 'MS Sans Serif'
  25.     Font.Style = []
  26.     ParentFont = False
  27.     WordWrap = True
  28.   end
  29.   object Label2: TLabel
  30.     Left = 292
  31.     Top = 396
  32.     Width = 162
  33.     Height = 52
  34.     Caption = 
  35.       #39'FindFirst'#39' searches the first record matching the given SQL-con' +
  36.       'dition using early-bound and late-bound direct DAO access.'
  37.     Font.Color = clBlack
  38.     Font.Height = -11
  39.     Font.Name = 'MS Sans Serif'
  40.     Font.Style = []
  41.     ParentFont = False
  42.     WordWrap = True
  43.   end
  44.   object Label3: TLabel
  45.     Left = 64
  46.     Top = 420
  47.     Width = 55
  48.     Height = 13
  49.     Caption = 'early-bound'
  50.   end
  51.   object Label4: TLabel
  52.     Left = 8
  53.     Top = 420
  54.     Width = 50
  55.     Height = 13
  56.     Caption = 'late-bound'
  57.   end
  58.   object DBNavigator1: TDBNavigator
  59.     Left = 8
  60.     Top = 4
  61.     Width = 240
  62.     Height = 25
  63.     DataSource = SrcComp
  64.     TabOrder = 0
  65.   end
  66.   object DBCtrlGrid1: TDBCtrlGrid
  67.     Left = 8
  68.     Top = 36
  69.     Width = 457
  70.     Height = 240
  71.     ColCount = 1
  72.     DataSource = SrcComp
  73.     PanelHeight = 24
  74.     PanelWidth = 441
  75.     TabOrder = 1
  76.     RowCount = 10
  77.     object Pers_Birthday: TDBText
  78.       Left = 244
  79.       Top = 6
  80.       Width = 77
  81.       Height = 11
  82.       DataField = 'Pers_Birthday'
  83.       DataSource = SrcComp
  84.     end
  85.     object Pers_LastName: TDBEdit
  86.       Left = 4
  87.       Top = 2
  88.       Width = 141
  89.       Height = 19
  90.       Ctl3D = False
  91.       DataField = 'Pers_LastName'
  92.       DataSource = SrcComp
  93.       MaxLength = 0
  94.       ParentCtl3D = False
  95.       TabOrder = 0
  96.     end
  97.     object Pers_FirstName: TDBEdit
  98.       Left = 152
  99.       Top = 2
  100.       Width = 85
  101.       Height = 19
  102.       Ctl3D = False
  103.       DataField = 'Pers_FirstName'
  104.       DataSource = SrcComp
  105.       MaxLength = 0
  106.       ParentCtl3D = False
  107.       TabOrder = 1
  108.     end
  109.   end
  110.   object Pers_Remarks: TDBMemo
  111.     Left = 8
  112.     Top = 284
  113.     Width = 457
  114.     Height = 61
  115.     Ctl3D = False
  116.     DataField = 'Pers_Remarks'
  117.     DataSource = SrcComp
  118.     ParentCtl3D = False
  119.     TabOrder = 2
  120.   end
  121.   object BtnLookup: TButton
  122.     Left = 8
  123.     Top = 348
  124.     Width = 109
  125.     Height = 25
  126.     Caption = 'Lookup Firstname'
  127.     TabOrder = 3
  128.     OnClick = BtnLookupClick
  129.   end
  130.   object BtnFindFirst: TButton
  131.     Left = 8
  132.     Top = 392
  133.     Width = 53
  134.     Height = 25
  135.     Caption = 'FindFirst'
  136.     TabOrder = 4
  137.     OnClick = BtnFindFirstClick
  138.   end
  139.   object EditFindText: TEdit
  140.     Left = 120
  141.     Top = 396
  142.     Width = 165
  143.     Height = 19
  144.     Ctl3D = False
  145.     ParentCtl3D = False
  146.     TabOrder = 5
  147.     Text = 'Pers_LastName like "R*"'
  148.   end
  149.   object EditLookup: TEdit
  150.     Left = 120
  151.     Top = 352
  152.     Width = 165
  153.     Height = 19
  154.     Ctl3D = False
  155.     ParentCtl3D = False
  156.     TabOrder = 6
  157.     Text = 'Bolli'
  158.   end
  159.   object BtnFindNext: TButton
  160.     Left = 64
  161.     Top = 392
  162.     Width = 53
  163.     Height = 25
  164.     Caption = 'FindNext'
  165.     TabOrder = 7
  166.     OnClick = BtnFindNextClick
  167.   end
  168.   object QryComp: TQuery
  169.     DatabaseName = 'DBDemo'
  170.     SessionName = 'Demo'
  171.     RequestLive = True
  172.     SQL.Strings = (
  173.       'SELECT'
  174.       '  * '
  175.       'FROM'
  176.       '  Person'
  177.       'ORDER BY'
  178.       '  Pers_LastName')
  179.     Left = 292
  180.     Top = 4
  181.     object QryCompPers_ID: TAutoIncField
  182.       FieldName = 'Pers_ID'
  183.     end
  184.     object QryCompPers_LastName: TStringField
  185.       FieldName = 'Pers_LastName'
  186.       Size = 50
  187.     end
  188.     object QryCompPers_FirstName: TStringField
  189.       FieldName = 'Pers_FirstName'
  190.       Size = 50
  191.     end
  192.     object QryCompPers_Remarks: TMemoField
  193.       FieldName = 'Pers_Remarks'
  194.       BlobType = ftMemo
  195.       Size = 65535
  196.     end
  197.     object QryCompPers_Birthday: TDateTimeField
  198.       FieldName = 'Pers_Birthday'
  199.     end
  200.     object QryCompPers_IsFemale: TBooleanField
  201.       FieldName = 'Pers_IsFemale'
  202.     end
  203.   end
  204.   object SrcComp: TDataSource
  205.     DataSet = QryComp
  206.     Left = 324
  207.     Top = 4
  208.   end
  209. end
  210.