unit1.dfm

数据库文件的使用

object Form1: TForm1
  Left = 200
  Top = 106
  Width = 510
  Height = 419
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object DBNavigator1: TDBNavigator
    Left = 96
    Top = 347
    Width = 300
    Height = 37
    DataSource = DataSource1
    Flat = True
    TabOrder = 0
  end
  object DBCtrlGrid1: TDBCtrlGrid
    Left = 9
    Top = 18
    Width = 485
    Height = 321
    DataSource = DataSource1
    PanelHeight = 107
    PanelWidth = 467
    TabOrder = 1
    object DBText1: TDBText
      Left = 13
      Top = 5
      Width = 147
      Height = 17
      DataField = 'Common_Name'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 14
      Top = 27
      Width = 121
      Height = 21
      DataField = 'Category'
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#21452#25340
      TabOrder = 0
    end
    object DBImage1: TDBImage
      Left = 336
      Top = 3
      Width = 114
      Height = 101
      DataField = 'Graphic'
      DataSource = DataSource1
      Stretch = True
      TabOrder = 1
    end
    object DBMemo1: TDBMemo
      Left = 189
      Top = 6
      Width = 137
      Height = 98
      DataField = 'Notes'
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#21452#25340
      TabOrder = 2
    end
    object DBEdit2: TDBEdit
      Left = 13
      Top = 51
      Width = 121
      Height = 21
      DataField = 'Species Name'
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#21452#25340
      TabOrder = 3
    end
    object DBEdit3: TDBEdit
      Left = 12
      Top = 75
      Width = 121
      Height = 21
      DataField = 'Length_In'
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#21452#25340
      TabOrder = 4
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 63
    Top = 348
  end
  object Query1: TQuery
    Active = True
    CachedUpdates = True
    DatabaseName = 'DBDEMOS'
    RequestLive = True
    SQL.Strings = (
      'select * from biolife')
    Left = 19
    Top = 348
  end
end