unit2.dfm

《Delphi案例设计》源代码

    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object DBEdit4: TDBEdit
    Left = 542
    Top = 97
    Width = 121
    Height = 20
    DataField = #32844#24037#22995#21517
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object DBEdit5: TDBEdit
    Left = 24
    Top = 176
    Width = 114
    Height = 20
    DataField = #21333#20301#32534#21495
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object DBEdit6: TDBEdit
    Left = 146
    Top = 176
    Width = 121
    Height = 20
    DataField = #21333#20301#21517#31216
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
  object DBEdit7: TDBEdit
    Left = 275
    Top = 176
    Width = 121
    Height = 20
    DataField = #22522#26412#24037#36164
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 6
  end
  object DBEdit8: TDBEdit
    Left = 408
    Top = 176
    Width = 121
    Height = 20
    DataField = #28014#21160#24037#36164
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 7
  end
  object DBEdit9: TDBEdit
    Left = 539
    Top = 176
    Width = 121
    Height = 20
    DataField = #24037#40836#24037#36164
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 8
  end
  object DBEdit10: TDBEdit
    Left = 24
    Top = 232
    Width = 114
    Height = 20
    DataField = #31918#24046
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 9
  end
  object DBEdit11: TDBEdit
    Left = 146
    Top = 232
    Width = 121
    Height = 20
    DataField = #29289#36148
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 10
  end
  object DBEdit12: TDBEdit
    Left = 275
    Top = 232
    Width = 121
    Height = 20
    DataField = #32905#36148
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 11
  end
  object DBEdit13: TDBEdit
    Left = 408
    Top = 232
    Width = 121
    Height = 20
    DataField = #21355#29983#36153
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 12
  end
  object DBEdit14: TDBEdit
    Left = 539
    Top = 232
    Width = 121
    Height = 20
    DataField = #29123#26009#34917#36148
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 13
  end
  object DBEdit15: TDBEdit
    Left = 24
    Top = 296
    Width = 114
    Height = 20
    DataField = #20445#38505#37329#25187#38500
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 14
  end
  object DBEdit16: TDBEdit
    Left = 146
    Top = 296
    Width = 121
    Height = 20
    DataField = #27700#30005#27668#25187#38500
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 15
  end
  object DBEdit17: TDBEdit
    Left = 275
    Top = 296
    Width = 121
    Height = 20
    DataField = #20303#25151#20445#35777#37329#25187#38500
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 16
  end
  object DBEdit18: TDBEdit
    Left = 408
    Top = 296
    Width = 121
    Height = 20
    DataField = #38381#36335#22825#32447#36153#25187#38500
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 17
  end
  object DBEdit19: TDBEdit
    Left = 539
    Top = 296
    Width = 121
    Height = 20
    DataField = #24635#24037#36164
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 18
  end
  object DBEdit20: TDBEdit
    Left = 24
    Top = 352
    Width = 114
    Height = 20
    DataField = #24635#25187#38500
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 19
  end
  object DBEdit21: TDBEdit
    Left = 146
    Top = 352
    Width = 121
    Height = 20
    DataField = #23454#21457#24037#36164
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 20
  end
  object DBNavigator1: TDBNavigator
    Left = 240
    Top = 400
    Width = 240
    Height = 25
    DataSource = DataSource1
    Flat = True
    TabOrder = 21
  end
  object Table1: TTable
    Active = True
    AutoRefresh = True
    TableName = #24037#36164#31649#29702'.db'
    Left = 536
    Top = 128
    object Table1BDEDesigner: TStringField
      FieldName = #20010#20154#24037#36164#21495
      Size = 16
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #21333#20301#32534#21495
      Size = 18
    end
    object Table1BDEDesigner3: TStringField
      FieldName = #21333#20301#21517#31216
    end
    object Table1BDEDesigner4: TStringField
      FieldName = #32844#24037#22995#21517
      Size = 10
    end
    object Table1BDEDesigner5: TStringField
      FieldName = #24037#36164#24180#20221
    end
    object Table1BDEDesigner6: TStringField
      FieldName = #24037#36164#26376#20221
      Size = 6
    end
    object Table1BDEDesigner7: TCurrencyField
      FieldName = #22522#26412#24037#36164
    end
    object Table1BDEDesigner8: TCurrencyField
      FieldName = #28014#21160#24037#36164
    end
    object Table1BDEDesigner9: TCurrencyField
      FieldName = #24037#40836#24037#36164
    end
    object Table1BDEDesigner10: TCurrencyField
      FieldName = #31918#24046
    end
    object Table1BDEDesigner11: TCurrencyField
      FieldName = #29289#36148
    end
    object Table1BDEDesigner12: TCurrencyField
      FieldName = #32905#36148
    end
    object Table1BDEDesigner13: TCurrencyField
      FieldName = #21355#29983#36153
    end
    object Table1BDEDesigner14: TCurrencyField
      FieldName = #29123#26009#34917#36148
    end
    object Table1BDEDesigner15: TCurrencyField
      FieldName = #20445#38505#37329#25187#38500
    end
    object Table1BDEDesigner16: TCurrencyField
      FieldName = #27700#30005#27668#25187#38500
    end
    object Table1BDEDesigner17: TCurrencyField
      FieldName = #20303#25151#20445#35777#37329#25187#38500
    end
    object Table1BDEDesigner18: TCurrencyField
      FieldName = #38381#36335#22825#32447#36153#25187#38500
    end
    object Table1BDEDesigner19: TCurrencyField
      FieldKind = fkCalculated
      FieldName = #24635#24037#36164
      Calculated = True
    end
    object Table1BDEDesigner20: TCurrencyField
      FieldName = #24635#25187#38500
    end
    object Table1BDEDesigner21: TCurrencyField
      FieldName = #23454#21457#24037#36164
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 488
    Top = 128
  end
end