ypxxunit.dfm

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

object Form3: TForm3
  Left = 94
  Top = 154
  Width = 607
  Height = 356
  Caption = #33647#21697#20449#24687#35760#24405#19982#26597#35810
  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 = 72
    Top = 16
    Width = 361
    Height = 30
    Caption = #33647#21697#20449#24687#35760#24405#19982#26597#35810#23376#31995#32479
    Font.Charset = GB2312_CHARSET
    Font.Color = clLime
    Font.Height = -29
    Font.Name = #21326#25991#26032#39759
    Font.Style = [fsBold]
    ParentFont = False
  end
  object SpeedButton1: TSpeedButton
    Left = 272
    Top = 276
    Width = 82
    Height = 22
    Caption = #25191#34892#26597#35810
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton1Click
  end
  object Label13: TLabel
    Left = 24
    Top = 280
    Width = 84
    Height = 12
    Caption = #33647#24215#21697#21517#31216#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel
    Left = 71
    Top = 17
    Width = 361
    Height = 30
    Caption = #33647#21697#20449#24687#35760#24405#19982#26597#35810#23376#31995#32479
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -29
    Font.Name = #21326#25991#26032#39759
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object SpeedButton2: TSpeedButton
    Left = 536
    Top = 64
    Width = 57
    Height = 22
    Caption = #22686#21152#35760#24405
    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 = 536
    Top = 116
    Width = 57
    Height = 22
    Caption = #21024#38500#35760#24405
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton3Click
  end
  object SpeedButton4: TSpeedButton
    Left = 536
    Top = 168
    Width = 57
    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 = SpeedButton4Click
  end
  object SpeedButton5: TSpeedButton
    Left = 536
    Top = 216
    Width = 57
    Height = 22
    Caption = #36820#22238
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton5Click
  end
  object GroupBox1: TGroupBox
    Left = 9
    Top = 56
    Width = 519
    Height = 209
    Caption = #33647#21697#35760#24405#19982#26174#31034
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label2: TLabel
      Left = 11
      Top = 38
      Width = 48
      Height = 12
      Caption = #33647#21697#21517#31216
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 190
      Top = 40
      Width = 48
      Height = 12
      Caption = #33647#21697#20195#30721
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 364
      Top = 40
      Width = 48
      Height = 12
      Caption = #33647#21697#20998#31867
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 11
      Top = 78
      Width = 36
      Height = 12
      Caption = #21046#36896#21830
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 190
      Top = 80
      Width = 48
      Height = 12
      Caption = #29983#20135#26102#26399
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 364
      Top = 80
      Width = 36
      Height = 12
      Caption = #26377#25928#26399
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 11
      Top = 126
      Width = 48
      Height = 12
      Caption = #36827#36135#21333#20215
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 190
      Top = 128
      Width = 24
      Height = 12
      Caption = #20135#22320
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 364
      Top = 128
      Width = 24
      Height = 12
      Caption = #21378#38271
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 11
      Top = 172
      Width = 48
      Height = 12
      Caption = #32852#31995#30005#35805
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 190
      Top = 174
      Width = 24
      Height = 12
      Caption = #20256#30495
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 69
      Top = 34
      Width = 112
      Height = 20
      DataField = #33647#21697#21517#31216
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 244
      Top = 35
      Width = 108
      Height = 20
      DataField = #33647#21697#20195#30721
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 421
      Top = 35
      Width = 87
      Height = 20
      DataField = #33647#21697#20998#31867
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 69
      Top = 77
      Width = 113
      Height = 20
      DataField = #21046#36896#21830
      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 = 244
      Top = 78
      Width = 109
      Height = 20
      DataField = #29983#20135#26102#26399
      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 = 419
      Top = 78
      Width = 89
      Height = 20
      DataField = #26377#25928#26399
      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 = 70
      Top = 122
      Width = 112
      Height = 20
      DataField = #36827#36135#21333#20215
      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 = 244
      Top = 122
      Width = 109
      Height = 20
      DataField = #29983#20135#22320#22336
      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 = 419
      Top = 122
      Width = 89
      Height = 20
      DataField = #21378#38271
      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 = 71
      Top = 166
      Width = 113
      Height = 20
      DataField = #32852#31995#30005#35805
      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 = 244
      Top = 166
      Width = 108
      Height = 20
      DataField = #20256#30495
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 10
    end
  end
  object Edit1: TEdit
    Left = 126
    Top = 275
    Width = 133
    Height = 20
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    Text = 'Edit1'
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 480
    Top = 56
  end
  object Table1: TTable
    Active = True
    TableName = #33647#21697#20449#24687'.db'
    Left = 520
    Top = 24
    object Table1BDEDesigner: TStringField
      FieldName = #33647#21697#20195#30721
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #33647#21697#21517#31216
    end
    object Table1BDEDesigner3: TStringField
      FieldName = #33647#21697#20998#31867
    end
    object Table1BDEDesigner4: TStringField
      FieldName = #21046#36896#21830
      Size = 30
    end
    object Table1BDEDesigner5: TStringField
      FieldName = #29983#20135#26102#26399
    end
    object Table1BDEDesigner6: TStringField
      FieldName = #26377#25928#26399
      Size = 4
    end
    object Table1BDEDesigner7: TCurrencyField
      FieldName = #36827#36135#21333#20215
    end
    object Table1BDEDesigner8: TStringField
      FieldName = #21378#38271
      Size = 10
    end
    object Table1BDEDesigner9: TStringField
      FieldName = #29983#20135#22320#22336
      Size = 30
    end
    object Table1BDEDesigner10: TStringField
      FieldName = #32852#31995#30005#35805
      Size = 13
    end
    object Table1BDEDesigner11: TStringField
      FieldName = #20256#30495
      Size = 13
    end
  end
end