ypxsunit.dfm

《delphi 7.0_8.0课程设计与系统开发案例》随书代码

object Form5: TForm5
  Left = 115
  Top = 138
  Width = 579
  Height = 402
  Caption = #33647#21697#38144#21806#31649#29702
  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 Label1: TLabel
    Left = 128
    Top = 24
    Width = 271
    Height = 30
    Caption = #33647#21697#38144#21806#31649#29702#23376#31995#32479
    Font.Charset = GB2312_CHARSET
    Font.Color = clLime
    Font.Height = -29
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 130
    Top = 23
    Width = 271
    Height = 30
    Caption = #33647#21697#38144#21806#31649#29702#23376#31995#32479
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -29
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object SpeedButton1: TSpeedButton
    Left = 184
    Top = 328
    Width = 73
    Height = 22
    Caption = #19979#19968#31508#19994#21153
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 256
    Top = 328
    Width = 78
    Height = 22
    Caption = #30830#35748
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 432
    Top = 328
    Width = 81
    Height = 22
    Caption = #25171#21360#21333#25454
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 64
    Width = 545
    Height = 129
    Caption = #38144#21806#35760#24405#27983#35272
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 9
      Top = 16
      Width = 527
      Height = 104
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 200
    Width = 545
    Height = 113
    Caption = #38144#21806#19994#21153#22788#29702
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label3: TLabel
      Left = 24
      Top = 24
      Width = 48
      Height = 12
      Caption = #38144#21806#26102#26399
    end
    object Label4: TLabel
      Left = 192
      Top = 26
      Width = 48
      Height = 12
      Caption = #33647#21697#21517#31216
    end
    object Label5: TLabel
      Left = 384
      Top = 28
      Width = 48
      Height = 12
      Caption = #33647#21697#20195#30721
    end
    object Label6: TLabel
      Left = 24
      Top = 72
      Width = 48
      Height = 12
      Caption = #38144#21806#25968#37327
    end
    object Label7: TLabel
      Left = 192
      Top = 72
      Width = 48
      Height = 12
      Caption = #38144#21806#21333#20215
    end
    object Label8: TLabel
      Left = 384
      Top = 72
      Width = 48
      Height = 12
      Caption = #38144#21806#37329#39069
    end
    object DBEdit1: TDBEdit
      Left = 80
      Top = 20
      Width = 100
      Height = 20
      DataField = #38144#21806#26102#26399
      DataSource = DataSource1
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 248
      Top = 22
      Width = 121
      Height = 20
      DataField = #33647#21697#21517#31216
      DataSource = DataSource1
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 436
      Top = 23
      Width = 99
      Height = 20
      DataField = #33647#21697#20195#30721
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 80
      Top = 68
      Width = 101
      Height = 20
      DataField = #38144#21806#25968#37327
      DataSource = DataSource1
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 248
      Top = 68
      Width = 121
      Height = 20
      DataField = #38144#21806#21333#20215
      DataSource = DataSource1
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 438
      Top = 68
      Width = 96
      Height = 20
      DataField = #38144#21806#37329#39069
      DataSource = DataSource1
      TabOrder = 5
    end
  end
  object Table1: TTable
    Active = True
    TableName = #38144#21806#24773#20917'.db'
    Left = 496
    Top = 32
    object Table1BDEDesigner: TStringField
      FieldName = #38144#21806#26102#26399
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #33647#21697#21517#31216
    end
    object Table1BDEDesigner3: TStringField
      FieldName = #33647#21697#20195#30721
    end
    object Table1BDEDesigner4: TFloatField
      FieldName = #38144#21806#25968#37327
    end
    object Table1BDEDesigner5: TCurrencyField
      FieldName = #38144#21806#21333#20215
    end
    object Table1BDEDesigner6: TCurrencyField
      FieldName = #38144#21806#37329#39069
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 520
    Top = 72
  end
end