hcck.~dfm

一个基于数据的药品行业管理系统,较全面,可供学习数据的开发人员参考消息

      Top = 365
      Width = 60
      Height = 13
      Caption = #39046#29992#25968#37327#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 137
      Top = 392
      Width = 60
      Height = 13
      Caption = #39046#29992#37329#39069#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object txtjhdh1: TLabel
      Left = 3
      Top = 19
      Width = 60
      Height = 13
      Caption = #39046#29992#21333#21495#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 3
      Top = 81
      Width = 60
      Height = 13
      Caption = #21046#21333#26085#26399#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label16: TLabel
      Left = 3
      Top = 171
      Width = 60
      Height = 13
      Caption = #25805'  '#20316'  '#21592#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label17: TLabel
      Left = 3
      Top = 140
      Width = 60
      Height = 13
      Caption = #39046'  '#29992'  '#20154#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label18: TLabel
      Left = 3
      Top = 112
      Width = 60
      Height = 13
      Caption = #37096'        '#38376#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label19: TLabel
      Left = 138
      Top = 332
      Width = 60
      Height = 13
      Caption = #25209#27425#24211#23384#65306
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object txthcbh: TEdit
      Left = 66
      Top = 195
      Width = 80
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 4
      TabOrder = 1
    end
    object txthcmc: TEdit
      Left = 66
      Top = 227
      Width = 208
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 150
      TabOrder = 2
    end
    object txtdw: TEdit
      Left = 66
      Top = 261
      Width = 60
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 150
      TabOrder = 3
    end
    object txtdqkc: TEdit
      Left = 66
      Top = 292
      Width = 60
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 50
      TabOrder = 5
      Text = '0'
    end
    object txtjhdj: TEdit
      Left = 66
      Top = 360
      Width = 60
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 100
      TabOrder = 8
      OnKeyPress = txtjhdjKeyPress
    end
    object txtcsbh: TComboBox
      Left = 66
      Top = 49
      Width = 206
      Height = 21
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 0
      OnChange = txtcsbhChange
      OnExit = txtcsbhExit
    end
    object txtpc: TEdit
      Left = 66
      Top = 328
      Width = 60
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 100
      TabOrder = 7
    end
    object txtaqkc: TEdit
      Left = 203
      Top = 293
      Width = 70
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 6
    end
    object txtgg: TEdit
      Left = 203
      Top = 261
      Width = 70
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 4
    end
    object txtjhsl: TEdit
      Left = 203
      Top = 359
      Width = 70
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 9
      OnChange = txtjhslChange
      OnKeyPress = txtjhslKeyPress
      OnKeyUp = txtjhslKeyUp
    end
    object txtjhje: TEdit
      Left = 204
      Top = 390
      Width = 71
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 10
    end
    object txtjhdh: TEdit
      Left = 66
      Top = 17
      Width = 132
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 11
    end
    object txtczy: TEdit
      Left = 66
      Top = 168
      Width = 120
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 12
    end
    object txtjhrq: TEdit
      Left = 66
      Top = 81
      Width = 120
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 13
    end
    object txtpckc: TEdit
      Left = 203
      Top = 332
      Width = 70
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 50
      TabOrder = 14
      Text = '0'
    end
    object txtbm: TComboBox
      Left = 66
      Top = 110
      Width = 120
      Height = 21
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 15
      OnChange = txtbmChange
      OnExit = txtcsbhExit
    end
    object txtyg: TComboBox
      Left = 66
      Top = 138
      Width = 120
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 16
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 563
    Width = 800
    Height = 22
    Color = 14935011
    Panels = <
      item
        Text = #24403#21069#35760#24405#25968#65306
        Width = 100
      end
      item
        Text = '0'
        Width = 50
      end>
  end
  object StringGrid1: TStringGrid
    Left = 284
    Top = 28
    Width = 516