mhcxunit.~dfm

宁夏中药管理系统,在其它的基础上改的,将他人没有完成的功能补上

      Width = 245
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 61
      Top = 197
      Width = 244
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 4
    end
    object DBMemo1: TDBMemo
      Left = 58
      Top = 231
      Width = 242
      Height = 81
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ScrollBars = ssVertical
      TabOrder = 5
    end
    object DBMemo2: TDBMemo
      Left = 58
      Top = 331
      Width = 244
      Height = 85
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ScrollBars = ssVertical
      TabOrder = 6
    end
    object DBMemo3: TDBMemo
      Left = 57
      Top = 444
      Width = 245
      Height = 69
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ScrollBars = ssVertical
      TabOrder = 7
    end
    object DBMemo4: TDBMemo
      Left = 56
      Top = 538
      Width = 247
      Height = 79
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ScrollBars = ssVertical
      TabOrder = 8
    end
    object Edit1: TEdit
      Left = 41
      Top = 22
      Width = 100
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 9
    end
    object Edit2: TEdit
      Left = 189
      Top = 21
      Width = 119
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 10
    end
    object DBEdit6: TDBEdit
      Left = 60
      Top = 114
      Width = 248
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 11
    end
  end
  object GroupBox2: TGroupBox
    Left = 544
    Top = 49
    Width = 441
    Height = 96
    Caption = #26597#35810#26465#20214
    Color = clCream
    ParentColor = False
    TabOrder = 3
    object Label1: TLabel
      Left = 29
      Top = 21
      Width = 24
      Height = 13
      Caption = #21151#25928
      Visible = False
    end
    object Label2: TLabel
      Left = 233
      Top = 21
      Width = 24
      Height = 13
      Caption = #20027#27835
      Visible = False
    end
    object Label3: TLabel
      Left = 32
      Top = 54
      Width = 24
      Height = 13
      Caption = #24615#21619
      Visible = False
    end
    object Label4: TLabel
      Left = 236
      Top = 53
      Width = 24
      Height = 13
      Caption = #24402#32463
      Visible = False
    end
    object Label6: TLabel
      Left = 34
      Top = 84
      Width = 24
      Height = 13
      Caption = #20851#31995
      Visible = False
    end
    object Label18: TLabel
      Left = 8
      Top = 32
      Width = 96
      Height = 13
      Caption = #26597#35810#26465#20214#65306#65293#65293#12299
    end
    object ComboBox1: TComboBox
      Left = 58
      Top = 16
      Width = 142
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = #25955#23506#27490#30171
      Visible = False
      Items.Strings = (
        #25955#23506#27490#30171
        #24179#32925#27490#30171
        #28165#28909#20937#34880)
    end
    object ComboBox2: TComboBox
      Left = 272
      Top = 15
      Width = 145
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 1
      Text = #29702#27668#27490#30171
      Visible = False
      Items.Strings = (
        #29702#27668#27490#30171
        #38754#36275#28014#32959)
    end
    object CBXwei: TComboBox
      Left = 61
      Top = 48
      Width = 140
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #33510
      Visible = False
      Items.Strings = (
        #33510
        #36763
        #28201
        #23506
        #28909
        #24179
        #29976
        #37240
        #28073
        #21688
        #20937
        #28129
        #24494#28201
        #24494#23506
        #24494#33510
        #24494#36763
        #26377#27602
        #26377#22823#27602
        #26377#23567#27602)
    end
    object CBGjing: TComboBox
      Left = 274
      Top = 46
      Width = 145
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = #24515
      Visible = False
      Items.Strings = (
        #24515
        #33086
        #32963
        #32925
        #32958
        #32954
        #32966
        #24515#21253
        #22823#32928
        #23567#32928
        #33152#33009)
    end
    object ComboBox6: TComboBox
      Left = 61
      Top = 77
      Width = 142
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 4
      Text = 'AND'
      Visible = False
      Items.Strings = (
        'AND'
        'OR')
    end
    object Button1: TButton
      Left = 117
      Top = 61
      Width = 261
      Height = 22
      Caption = #26597#25214
      TabOrder = 5
      OnClick = Button1Click
    end
    object Edit3: TEdit
      Left = 104
      Top = 24
      Width = 329
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 6
    end
  end
  object GroupBox3: TGroupBox
    Left = 544
    Top = 152
    Width = 441
    Height = 513
    Caption = #26597#35810#32467#26524
    Color = clCream
    ParentColor = False
    TabOrder = 4
    object DBGrid1: TDBGrid
      Left = 0
      Top = 13
      Width = 441
      Height = 480
      DataSource = DataSource1
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
    end
  end
  object ADOQuery1: TADOQuery
    Connection = Form1.ADOConnection1
    Parameters = <>
    Left = 120
    Top = 104
  end
  object ADOQuery2: TADOQuery
    Connection = Form1.ADOConnection1
    DataSource = FenLeiCXfrm.DataSource1
    Parameters = <>
    SQL.Strings = (
      'select * from ls')
    Left = 112
    Top = 216
  end
  object ADOTable1: TADOTable
    Connection = Form1.ADOConnection1
    Filter = '*.mdb'
    TableDirect = True
    Left = 40
    Top = 208
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery2
    Left = 8
    Top = 128
  end
  object ADOTable2: TADOTable
    Connection = Form1.ADOConnection1
    TableDirect = True
    Left = 80
    Top = 320
  end
end