zgb1.dfm

职工信息管理系统的源代码

    Height = 17
    Anchors = [akLeft, akTop, akRight]
    AutoSelect = False
    BevelInner = bvLowered
    BevelOuter = bvRaised
    Color = clWhite
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    OnKeyPress = Edit1KeyPress
  end
  object Edit2: TEdit
    Left = 128
    Top = 72
    Width = 95
    Height = 17
    Anchors = [akLeft, akTop, akRight]
    AutoSelect = False
    Color = clWhite
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    OnKeyPress = Edit2KeyPress
  end
  object ComboBox1: TComboBox
    Left = 128
    Top = 112
    Width = 145
    Height = 19
    BevelKind = bkFlat
    Style = csSimple
    Color = clWhite
    Ctl3D = False
    ItemHeight = 11
    ParentCtl3D = False
    TabOrder = 2
    OnChange = ComboBox1Change
    OnClick = ComboBox1Click
    OnKeyPress = ComboBox1KeyPress
    Items.Strings = (
      #30007
      #22899)
  end
  object ComboBox2: TComboBox
    Left = 128
    Top = 216
    Width = 145
    Height = 19
    BevelKind = bkFlat
    Style = csSimple
    Color = clWhite
    Ctl3D = False
    ItemHeight = 11
    ParentCtl3D = False
    TabOrder = 3
    OnChange = ComboBox2Change
    OnClick = ComboBox2Click
  end
  object DBNavigator1: TDBNavigator
    Left = 280
    Top = 32
    Width = 216
    Height = 18
    Cursor = crHandPoint
    DataSource = DataSource1
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
    Flat = True
    Ctl3D = True
    ParentCtl3D = False
    TabOrder = 4
    OnClick = DBNavigator1Click
  end
  object ComboBox3: TComboBox
    Left = 128
    Top = 272
    Width = 145
    Height = 19
    BevelKind = bkFlat
    Style = csSimple
    Ctl3D = False
    ItemHeight = 11
    ParentCtl3D = False
    TabOrder = 5
    OnChange = ComboBox3Change
    OnClick = ComboBox3Click
    OnKeyPress = ComboBox3KeyPress
  end
  object Edit3: TEdit
    Left = 120
    Top = 160
    Width = 57
    Height = 17
    Anchors = [akLeft, akTop, akRight]
    AutoSelect = False
    TabOrder = 6
    OnKeyDown = Edit3KeyDown
    OnKeyPress = Edit3KeyPress
  end
  object ComboBox4: TComboBox
    Left = 192
    Top = 160
    Width = 41
    Height = 18
    BevelKind = bkFlat
    Style = csSimple
    ItemHeight = 11
    MaxLength = 2
    TabOrder = 7
    OnClick = ComboBox4Click
    OnKeyDown = ComboBox4KeyDown
    OnKeyUp = ComboBox4KeyUp
    Items.Strings = (
      '1'
      '2'
      '3'
      '4'
      '5'
      '6'
      '7'
      '8'
      '9'
      '10'
      '11'
      '12')
  end
  object ComboBox5: TComboBox
    Left = 248
    Top = 160
    Width = 41
    Height = 18
    BevelKind = bkFlat
    Style = csSimple
    ItemHeight = 11
    MaxLength = 2
    TabOrder = 8
    OnKeyDown = ComboBox5KeyDown
    OnKeyUp = ComboBox5KeyUp
  end
  object FlatGroupBox1: TFlatGroupBox
    Left = 288
    Top = 64
    Width = 185
    Height = 49
    Transparent = True
    Caption = #23450#20301#25805#20316
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 9
    object RadioButton1: TFlatRadioButton
      Left = 8
      Top = 24
      Width = 81
      Height = 17
      Transparent = True
      Caption = #32534#21495#23450#20301
      ColorFocused = 4620943
      ColorDown = 12442079
      ColorBorder = 8698051
      UseAdvColors = True
      TabOrder = 0
      OnClick = RadioButton1Click
    end
    object RadioButton2: TFlatRadioButton
      Left = 96
      Top = 24
      Width = 81
      Height = 17
      Transparent = True
      Caption = #22995#21517#23450#20301
      ColorFocused = 4620943
      ColorDown = 12442079
      ColorBorder = 8698051
      UseAdvColors = True
      TabOrder = 1
      OnClick = RadioButton2Click
    end
  end
  object zgb: TTable
    AutoRefresh = True
    TableName = 'zgb.DB'
    Left = 80
    Top = 128
    object zgbBDEDesigner: TStringField
      FieldName = #32844#24037#32534#21495
    end
    object zgbBDEDesigner2: TStringField
      FieldName = #22995#21517
    end
    object zgbBDEDesigner3: TStringField
      FieldName = #24615#21035
      Size = 2
    end
    object zgbBDEDesigner4: TStringField
      FieldName = #37096#38376#21495
      Size = 3
    end
    object zgbBDEDesigner5: TStringField
      FieldName = #32844#31216
    end
    object zgbDate: TDateField
      FieldName = 'Date'
    end
  end
  object DataSource1: TDataSource
    DataSet = zgb
    Left = 96
    Top = 88
  end
  object bmb: TTable
    AutoRefresh = True
    MasterFields = #37096#38376#21495
    MasterSource = DataSource1
    TableName = 'bmb.db'
    Left = 80
    Top = 168
    object bmbBDEDesigner: TStringField
      FieldName = #37096#38376#21495
      Size = 3
    end
    object bmbBDEDesigner2: TStringField
      FieldName = #37096#38376#21517#31216
    end
  end
  object bmb1: TTable
    AutoRefresh = True
    TableName = 'bmb.db'
    Left = 96
    Top = 40
    object bmb1BDEDesigner: TStringField
      FieldName = #37096#38376#21495
      Size = 3
    end
    object bmb1BDEDesigner2: TStringField
      FieldName = #37096#38376#21517#31216
    end
  end
  object zc: TTable
    AutoRefresh = True
    Left = 392
    Top = 176
  end
  object gzb: TTable
    AutoRefresh = True
    IndexFieldNames = #32844#24037#32534#21495
    MasterFields = #32844#24037#32534#21495
    MasterSource = DataSource1
    TableName = 'GZB.DB'
    Left = 336
    Top = 176
    object gzbBDEDesigner: TStringField
      FieldName = #32844#24037#32534#21495
    end
    object gzbBDEDesigner2: TStringField
      FieldName = #26103#24037
      Size = 2
    end
    object gzbBDEDesigner3: TStringField
      FieldName = #36831#21040
      Size = 2
    end
    object gzbBDEDesigner4: TStringField
      FieldName = #20107#20551
      Size = 2
    end
    object gzbBDEDesigner5: TStringField
      FieldName = #22870#37329
      Size = 2
    end
  end
end