hcckdnew.dfm

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

object frm_hcckdnew: Tfrm_hcckdnew
  Left = 199
  Top = 96
  BorderIcons = []
  BorderStyle = bsToolWindow
  Caption = #32791#26448#39046#29992#28155#21152#21333
  ClientHeight = 304
  ClientWidth = 361
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 281
    Top = 88
    Width = 75
    Height = 25
    Caption = #32487#32493#26032#22686
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 281
    Top = 154
    Width = 75
    Height = 25
    Caption = #20445#23384#36864#20986
    TabOrder = 1
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 281
    Top = 219
    Width = 75
    Height = 25
    Caption = #21462#28040#36864#20986
    TabOrder = 2
    OnClick = Button3Click
  end
  object GroupBox1: TGroupBox
    Left = 2
    Top = 1
    Width = 263
    Height = 301
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object Label1: TLabel
      Left = 7
      Top = 19
      Width = 65
      Height = 13
      Caption = #32791#26448#32534#21495#65306
    end
    object Label2: TLabel
      Left = 7
      Top = 50
      Width = 65
      Height = 13
      Caption = #32791#26448#21517#31216#65306
    end
    object Label3: TLabel
      Left = 7
      Top = 83
      Width = 65
      Height = 13
      Caption = #32791#26448#35268#26684#65306
    end
    object Label9: TLabel
      Left = 7
      Top = 112
      Width = 39
      Height = 13
      Caption = #21333#20301#65306
    end
    object Label4: TLabel
      Left = 7
      Top = 181
      Width = 65
      Height = 13
      Caption = #25209#27425#24211#23384#65306
    end
    object Label5: TLabel
      Left = 6
      Top = 146
      Width = 52
      Height = 13
      Caption = #24635#23384#37327#65306
    end
    object Label6: TLabel
      Left = 7
      Top = 215
      Width = 65
      Height = 13
      Caption = #39046#29992#21333#20215#65306
    end
    object Label7: TLabel
      Left = 7
      Top = 247
      Width = 65
      Height = 13
      Caption = #39046#29992#25968#37327#65306
    end
    object Label8: TLabel
      Left = 7
      Top = 277
      Width = 65
      Height = 13
      Caption = #39046#29992#37329#39069#65306
    end
    object Label10: TLabel
      Left = 7
      Top = 313
      Width = 65
      Height = 13
      Caption = #32570#36135#26631#24535#65306
      Enabled = False
    end
    object Label11: TLabel
      Left = 265
      Top = 18
      Width = 78
      Height = 13
      Caption = #36827#38144#24046#20215#29575#65306
      Enabled = False
    end
    object Label12: TLabel
      Left = 265
      Top = 52
      Width = 52
      Height = 13
      Caption = #22823#21253#37327#65306
      Enabled = False
    end
    object Label13: TLabel
      Left = 265
      Top = 84
      Width = 65
      Height = 13
      Caption = #21830#21697#24615#36136#65306
      Enabled = False
    end
    object Label17: TLabel
      Left = 265
      Top = 117
      Width = 65
      Height = 13
      Caption = #21830#21697#29366#24577#65306
      Enabled = False
    end
    object Label18: TLabel
      Left = 265
      Top = 160
      Width = 65
      Height = 13
      Caption = #31216#37325#29366#24577#65306
      Enabled = False
    end
    object Label19: TLabel
      Left = 265
      Top = 193
      Width = 65
      Height = 13
      Caption = #20445#36136#23646#24615#65306
      Enabled = False
    end
    object Label20: TLabel
      Left = 265
      Top = 232
      Width = 65
      Height = 13
      Caption = #36827#36135#31246#29575#65306
      Enabled = False
    end
    object Label21: TLabel
      Left = 265
      Top = 270
      Width = 65
      Height = 13
      Caption = #38144#36135#31246#29575#65306
      Enabled = False
    end
    object Label22: TLabel
      Left = 265
      Top = 305
      Width = 65
      Height = 13
      Caption = #32852#33829#25187#29575#65306
      Enabled = False
    end
    object Label14: TLabel
      Left = 173
      Top = 144
      Width = 39
      Height = 13
      Caption = #25209#21495#65306
    end
    object txtspbh: TEdit
      Left = 67
      Top = 15
      Width = 135
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 4
      TabOrder = 0
      OnChange = txtspbhChange
      OnEnter = txtspbhEnter
      OnExit = txtspbhExit
      OnKeyPress = txtspbhKeyPress
    end
    object txtspmc: TEdit
      Left = 67
      Top = 48
      Width = 187
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 1
    end
    object txtspgg: TEdit
      Left = 67
      Top = 78
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 2
      OnEnter = txtspggEnter
      OnExit = txtspggExit
      OnKeyPress = txtspggKeyPress
    end
    object comspxz: TComboBox
      Left = 339
      Top = 75
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 3
      OnChange = comspxzChange
      Items.Strings = (
        '0-'#19968#33324#21830#21697
        '1-'#32452#21512#21830#21697
        '2-'#21407#26448#26009#21830#21697
        '3-'#21152#24037#25104#21697)
    end
    object txtdw: TEdit
      Left = 67
      Top = 110
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 4
      TabOrder = 4
      OnEnter = txtdwEnter
      OnExit = txtdwExit
      OnKeyPress = txtdwKeyPress
    end
    object txtpckc: TEdit
      Left = 66
      Top = 177
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 5
      OnEnter = txtpckcEnter
      OnExit = txtpckcExit
      OnKeyPress = txtpckcKeyPress
    end
    object txtdqkc: TEdit
      Left = 65
      Top = 142
      Width = 102
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 6
      OnEnter = txtdqkcEnter
      OnExit = txtdqkcExit
      OnKeyPress = txtdqkcKeyPress
    end
    object txtjhdj: TEdit
      Left = 67
      Top = 213
      Width = 100
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 4
      TabOrder = 7
      OnEnter = txtjhdjEnter
      OnExit = txtjhdjExit
      OnKeyPress = txtjhdjKeyPress
    end
    object txtjhje: TEdit
      Left = 66
      Top = 274
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 8
    end
    object txtcbdj: TEdit
      Left = 331
      Top = 227
      Width = 100
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 9
      Text = 'txtcbdj'
      OnEnter = txtcbdjEnter
      OnExit = txtcbdjExit
      OnKeyPress = txtcbdjKeyPress
    end
    object txtjxcjl: TEdit
      Left = 339
      Top = 14
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 4
      TabOrder = 10
      Text = 'txtjxcjl'
      OnEnter = txtjxcjlEnter
      OnExit = txtjxcjlExit
      OnKeyPress = txtjxcjlKeyPress
    end
    object txtmax: TEdit
      Left = 339
      Top = 45
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 11
      Text = 'txtmax'
      OnEnter = txtmaxEnter
      OnExit = txtmaxExit
      OnKeyPress = txtmaxKeyPress
    end
    object txtjhsl: TEdit
      Left = 67
      Top = 244
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 4
      TabOrder = 12
      OnEnter = txtjhslEnter
      OnExit = txtjhslExit
      OnKeyPress = txtjhslKeyPress
      OnKeyUp = txtjhslKeyUp
    end
    object txtxhsl: TEdit
      Left = 339
      Top = 263
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 13
      Text = 'txtxhsl'
      OnEnter = txtxhslEnter
      OnExit = txtxhslExit
      OnKeyPress = txtxhslKeyPress
    end
    object txtlykl: TEdit
      Left = 339
      Top = 301
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 14
      Text = 'txtlykl'
      OnEnter = txtlyklEnter
      OnExit = txtlyklExit
      OnKeyPress = txtlyklKeyPress
    end
    object comspzt: TComboBox
      Left = 339
      Top = 114
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 15
      OnChange = comspztChange
      Items.Strings = (
        '0-'#27491#24120#29366#24577
        '1-'#26242#20572#38144#21806
        '2-'#28120#27760#29366#24577)
    end
    object comczzt: TComboBox
      Left = 339
      Top = 154
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 16
      Items.Strings = (
        '0-'#31216#20013#21830#21697
        '1-'#38750#31216#20013#21830#21697)
    end
    object txtqhbz: TEdit
      Left = 66
      Top = 308
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 17
      Text = 'txtqhbz'
      OnEnter = txtqhbzEnter
      OnExit = txtqhbzExit
      OnKeyPress = txtqhbzKeyPress
    end
    object combzq: TComboBox
      Left = 339
      Top = 188
      Width = 100
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 18
      OnChange = combzqChange
      Items.Strings = (
        '0-'#26377#20445#36136#26399
        '1-'#26080#20445#36136#26399
        '')
    end
    object Button4: TButton
      Left = 201
      Top = 15
      Width = 45
      Height = 21
      Caption = #26597#35810
      TabOrder = 19
      OnClick = Button4Click
    end
    object txtpc: TEdit
      Left = 207
      Top = 142
      Width = 43
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 20
    end
  end
  object DBGrid1: TDBGrid
    Left = 6
    Top = 37
    Width = 255
    Height = 73
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Visible = False
    OnDblClick = DBGrid1DblClick
  end
end