child_lab.dfm

一个桌面数据库应用的源码,适合初学数据库编程的新手.

            Height = 12
            Caption = #22411#21495
            WordWrap = True
          end
          object Label20: TLabel
            Left = 8
            Top = 40
            Width = 36
            Height = 12
            Caption = #21551#29992#26085
          end
          object Label23: TLabel
            Left = 120
            Top = 40
            Width = 24
            Height = 12
            Caption = #22320#26041
          end
          object SpeedButton1: TSpeedButton
            Left = 216
            Top = 64
            Width = 41
            Height = 25
            Caption = #26597#35810
            Flat = True
            OnClick = SpeedButton1Click
          end
          object SpeedButton2: TSpeedButton
            Left = 280
            Top = 64
            Width = 41
            Height = 25
            Caption = #25152#26377
            Flat = True
            OnClick = SpeedButton2Click
          end
          object Label11: TLabel
            Left = 240
            Top = 16
            Width = 24
            Height = 12
            Caption = #29366#20917
            WordWrap = True
          end
          object Label12: TLabel
            Left = 240
            Top = 40
            Width = 48
            Height = 12
            Caption = #25152#23646#23454#39564
          end
          object Edit_No: TEdit
            Left = 152
            Top = 8
            Width = 81
            Height = 20
            TabOrder = 0
          end
          object Edit_name: TEdit
            Left = 53
            Top = 8
            Width = 60
            Height = 20
            TabOrder = 1
          end
          object Edit_date: TEdit
            Left = 53
            Top = 32
            Width = 60
            Height = 20
            TabOrder = 2
          end
          object Edit_address: TEdit
            Left = 152
            Top = 32
            Width = 81
            Height = 20
            TabOrder = 3
          end
          object RadioGroup1: TRadioGroup
            Left = 16
            Top = 56
            Width = 177
            Height = 33
            Columns = 2
            ItemIndex = 0
            Items.Strings = (
              #36923#36753#19982
              #36923#36753#25110)
            TabOrder = 4
          end
          object ComboBox1: TComboBox
            Left = 272
            Top = 8
            Width = 57
            Height = 20
            ItemHeight = 12
            TabOrder = 5
            Items.Strings = (
              ''
              #22909
              #33391#22909
              #21208#29992
              #25253#24223
              #24453#20462)
          end
          object Edit_experi: TEdit
            Left = 296
            Top = 32
            Width = 33
            Height = 20
            TabOrder = 6
          end
        end
      end
      object TabSheet3: TTabSheet
        Caption = #25171#21360
        ImageIndex = 14
        object SpeedButton3: TSpeedButton
          Left = 16
          Top = 80
          Width = 305
          Height = 22
          Caption = #39044#35272#25171#21360
          Flat = True
          Glyph.Data = {
            26050000424D26050000000000003604000028000000100000000F0000000100
            080000000000F0000000C30E0000C30E00000001000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000C0DCC000F0C8
            A400000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00060000000000
            0000000000000606000000FFFFFFFFFFFFFFFFFFFF000600000000FFFFFFFFFF
            FFFF000000001000000600FFFFFFFFFFFF00100707100010060600FFFFFFFFFF
            00100707FF101000060600FFFFFFFFFF0007070707100600060600FFFFFFFFFF
            0007FF0707100600060600FFFFFFFFFF0010FFFF07101000060600FFFFFFFFFF
            FF00100707100006060600FFFFFFFFFFFFFF000000000606060600FFFFFFFFFF
            FFFFFFFFFF000606060600FFFFFFFFFFFFFF000000000606060600FFFFFFFFFF
            FFFF000600060606060600FFFFFFFFFFFFFF0000060606060606060000000000
            00000006060606060606}
          OnClick = SpeedButton3Click
        end
        object RadioGroup2: TRadioGroup
          Left = 16
          Top = 8
          Width = 129
          Height = 57
          ItemIndex = 0
          Items.Strings = (
            #20840#37096#35760#24405
            #26597#35810#35760#24405)
          TabOrder = 0
        end
        object RadioGroup3: TRadioGroup
          Left = 192
          Top = 8
          Width = 129
          Height = 57
          ItemIndex = 0
          Items.Strings = (
            #26684#24335#19968
            #26684#24335#20108)
          TabOrder = 1
        end
      end
    end
  end
  object Table1: TTable
    AutoRefresh = True
    FieldDefs = <
      item
        Name = #20202#22120#32534#21495
        DataType = ftString
        Size = 20
      end
      item
        Name = #20202#22120#21517#31216
        DataType = ftString
        Size = 20
      end
      item
        Name = #22411#21495
        DataType = ftString
        Size = 10
      end
      item
        Name = #21551#29992#26085#26399
        DataType = ftDate
      end
      item
        Name = #20215#26684
        DataType = ftCurrency
      end
      item
        Name = #29366#20917
        DataType = ftString
        Size = 10
      end
      item
        Name = #25918#32622#20301#32622
        DataType = ftString
        Size = 10
      end
      item
        Name = #20998#31867
        DataType = ftSmallint
      end
      item
        Name = #25152#23646#23454#39564
        DataType = ftSmallint
      end
      item
        Name = #22791#27880
        DataType = ftString
        Size = 50
      end>
    IndexDefs = <
      item
        Name = 'Table1Index1'
        Fields = #20202#22120#32534#21495
        Options = [ixPrimary, ixUnique]
      end
      item
        Name = 'Ind_experi'
        Fields = #25152#23646#23454#39564
        Options = [ixCaseInsensitive]
      end
      item
        Name = 'Ind_type'
        Fields = #20998#31867
        Options = [ixCaseInsensitive]
      end>
    StoreDefs = True
    Left = 16
    Top = 304
    object Table1StringField: TStringField
      FieldName = #20202#22120#32534#21495
    end
    object Table1StringField2: TStringField
      FieldName = #20202#22120#21517#31216
    end
    object Table1StringField3: TStringField
      FieldName = #22411#21495
      Size = 10
    end
    object Table1DateField: TDateField
      FieldName = #21551#29992#26085#26399
    end
    object Table1CurrencyField: TCurrencyField
      FieldName = #20215#26684
    end
    object Table1StringField4: TStringField
      FieldName = #29366#20917
      Size = 10
    end
    object Table1StringField5: TStringField
      FieldName = #25918#32622#20301#32622
      Size = 10
    end
    object Table1SmallintField: TSmallintField
      FieldName = #20998#31867
    end
    object Table1SmallintField2: TSmallintField
      FieldName = #25152#23646#23454#39564
    end
    object Table1StringField6: TStringField
      FieldName = #22791#27880
      Size = 50
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    OnDataChange = DataSource1DataChange
    Left = 112
    Top = 304
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 264
    Top = 304
  end
  object Table2: TTable
    AutoRefresh = True
    IndexFieldNames = #20998#31867
    MasterFields = #20998#31867
    MasterSource = DataSource1
    TableName = 'type.db'
    Left = 208
    Top = 304
  end
  object Query1: TQuery
    AutoRefresh = True
    Left = 56
    Top = 304
  end
  object Table3: TTable
    AutoRefresh = True
    IndexFieldNames = #25152#23646#23454#39564
    MasterFields = #25152#23646#23454#39564
    MasterSource = DataSource1
    TableName = 'experi.db'
    Left = 320
    Top = 296
  end
  object DataSource3: TDataSource
    DataSet = Table3
    Left = 376
    Top = 296
  end
end