spwh.dfm

集成酒店桑拿食管管理的完整程序

object xfwhForm: TxfwhForm
  Left = 0
  Top = 104
  Width = 794
  Height = 461
  Anchors = [akLeft, akRight, akBottom]
  BiDiMode = bdLeftToRight
  BorderIcons = [biSystemMenu]
  Caption = '消费项目维护'
  Color = clBtnFace
  DragMode = dmAutomatic
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  ParentBiDiMode = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 173
    Height = 434
    Align = alLeft
    Caption = '树状类别图'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object TreeView1: TTreeView
      Left = 4
      Top = 41
      Width = 131
      Height = 32
      HotTrack = True
      Indent = 19
      TabOrder = 0
      OnClick = TreeView2Click
    end
    object TreeView2: TTreeView
      Left = 2
      Top = 15
      Width = 169
      Height = 417
      Align = alClient
      Color = clBtnFace
      HotTrack = True
      Images = ImageList1
      Indent = 19
      PopupMenu = PopupMenu1
      ReadOnly = True
      TabOrder = 1
      OnChange = TreeView2Change
      OnClick = TreeView2Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 173
    Top = 0
    Width = 613
    Height = 434
    Align = alClient
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 15
      Width = 609
      Height = 359
      Align = alClient
      Color = clInfoBk
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ImeName = '全拼输入法'
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      OnKeyDown = DBGrid1KeyDown
      OnKeyPress = DBGrid1KeyPress
    end
    object Panel1: TPanel
      Left = 2
      Top = 374
      Width = 609
      Height = 58
      Align = alBottom
      BevelOuter = bvNone
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object GroupBox3: TGroupBox
        Left = 0
        Top = 0
        Width = 609
        Height = 58
        Align = alClient
        Caption = '操作说明'
        TabOrder = 0
        object BitBtn3: TBitBtn
          Left = 428
          Top = 32
          Width = 57
          Height = 23
          Caption = '删除'
          TabOrder = 0
          OnClick = BitBtn3Click
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333333333333333333333333333FFF33FF333FFF339993370733
            999333777FF37FF377733339993000399933333777F777F77733333399970799
            93333333777F7377733333333999399933333333377737773333333333990993
            3333333333737F73333333333331013333333333333777FF3333333333910193
            333333333337773FF3333333399000993333333337377737FF33333399900099
            93333333773777377FF333399930003999333337773777F777FF339993370733
            9993337773337333777333333333333333333333333333333333333333333333
            3333333333333333333333333333333333333333333333333333}
          NumGlyphs = 2
        end
        object BitBtn4: TBitBtn
          Left = 484
          Top = 32
          Width = 57
          Height = 23
          Caption = '复制'
          TabOrder = 1
          OnClick = BitBtn4Click
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333333333333333333333333333333FF3FFFFFFF3FFFF003000000030
            0000773777777737777703330030033300037FFF77F77FFF7773700007330000
            003377777733777777F3303003330030003337F77F3377F77733303073333030
            033337F77F3337F77F3337007333300003333777733337777333330033333000
            33333377F3333777F33333073333330033333377333333773333333333333333
            33333333FF333333FF33333973333337933333377FF333377F33333999333399
            93333337773333777F333339933333399333333773FF33377F33333939733793
            93333337377FF773733333333399993333333333337777333333}
          NumGlyphs = 2
        end
        object BitBtn5: TBitBtn
          Left = 540
          Top = 32
          Width = 57
          Height = 23
          Caption = '退出'
          TabOrder = 2
          OnClick = BitBtn5Click
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
            0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
            00007777777777777777933393303933337073F37F37F73F3377393393303393
            379037FF7F37F37FF777379793303379793037777337F3777737339933303339
            93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
            999037777337F377777793993330333393307377FF37F3337FF7333993303333
            993033377F37F33377F7333993303333993033377337F3337737333333303333
            33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
            03037F7F7F7F7F7F7F7F00000000000000007777777777777777}
          NumGlyphs = 2
        end
        object Memo1: TMemo
          Left = 2
          Top = 14
          Width = 359
          Height = 42
          Align = alLeft
          BorderStyle = bsNone
          Color = clMenu
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ImeName = '全拼输入法'
          Lines.Strings = (
            ' 按[Insert]键插入记录 按[Ctrl]+[Delete]组合键删除记录'
            ''
            ' 品名相同不同产地或批号的产品可按[Ctrl]+[Insert]组合键复制')
          ParentFont = False
          TabOrder = 3
        end
        object BitBtn1: TBitBtn
          Left = 371
          Top = 32
          Width = 57
          Height = 23
          Caption = '添加'
          TabOrder = 4
          OnClick = BitBtn1Click
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
            555555555555555555555555555555555555555555FF55555555555559055555
            55555555577FF5555555555599905555555555557777F5555555555599905555
            555555557777FF5555555559999905555555555777777F555555559999990555
            5555557777777FF5555557990599905555555777757777F55555790555599055
            55557775555777FF5555555555599905555555555557777F5555555555559905
            555555555555777FF5555555555559905555555555555777FF55555555555579
            05555555555555777FF5555555555557905555555555555777FF555555555555
            5990555555555555577755555555555555555555555555555555}
          NumGlyphs = 2
        end
        object DBNavigator1: TDBNavigator
          Left = 371
          Top = 7
          Width = 224
          Height = 25
          DataSource = DataSource1
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbRefresh]
          Hints.Strings = (
            '第一条记录'
            '下一条记录'
            '上一条记录'
            '最后一条记录'
            '插入新记录'
            '删除当前记录'
            '刷新')
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
        end
      end
    end
    object ComboBox1: TComboBox
      Left = 176
      Top = 120
      Width = 161
      Height = 21
      ImeName = '全拼输入法'
      ItemHeight = 13
      TabOrder = 2
      Text = 'ComboBox1'
      Visible = False
    end
  end
  object Query1: TQuery
    DatabaseName = 'sanadm'
    Left = 130
    Top = 97
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 290
    Top = 137
  end
  object Table1: TTable
    Active = True
    AfterOpen = Table1AfterOpen
    AfterInsert = Table1AfterInsert
    DatabaseName = 'sanadm'
    IndexFieldNames = 'Cuscode'
    TableName = 'dbo.CUSITEM'
    Left = 401
    Top = 152
  end
  object PopupMenu1: TPopupMenu
    Left = 64
    Top = 224
    object N1: TMenuItem
      Caption = '新增大类'
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = '新增类别'
      OnClick = N2Click
    end
    object N3: TMenuItem
      Caption = '删除类别'
      OnClick = N3Click
    end
  end
  object ImageList1: TImageList
    Left = 56
    Top = 136
    Bitmap = {
      494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000001000000001001000000000000008
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000009F3F1F003F00803F00003F00803F
      00003F003F00BF3F803F9F1F1F003F00807F0000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000003F00803F00003F00803F00003F00
      803F00003F00803F00003F00803F00003F000000000000000000000000000000
      00000000000000000000000000000000000000000000000000000000007C0000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000007C007C007C
      0000000000000000000000000000000000000000E07F00000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000E07FFF7FE07FFF7F
      E07FFF7FE07FFF7FE07F00000000000000000000000000000000007C007C007C
      000000000000000000000000000000000000000000000000FF0300000000E07F
      FF7FE07FFF7FE07F000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000FF7FE07FFF7FE07F
      FF7FE07FFF7FE07FFF7F0000000000000000000000000000007C007C007C007C
      007C00000000000000000000000000000000000000000000FF030000E07FFF7F
      E07FFF7F00000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000E07FFF7FE07FFF7F
      E07FFF7FE07FFF7FE07F000000000000000000000000007C007C007C007C007C
      007C00000000000000000000000000000000000000000000FF030000FF7FE07F
      FF7FE07FFF7FE07FFF7F00000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000FF7FE07FFF7FE07F
      FF7FE07FFF7FE07FFF7F00000000000000000000EF3D007C007C00000000007C
      007C007C0000000000000000000000000000000000000000FF030000E07FFF7F
      E07FFF7F00000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000E07FFF7FE07FFF7F
      E07FFF7FE07FFF7FE07F0000000000000000EF3D007C00000000000000000000
      007C007C0000000000000000000000000000000000000000FF030000FF7FE07F
      FF7FE07FFF7FE07FFF7FE07FFF7FE07F00000000000000000000000000000000
      000000000000000000000000000000000000000000000000FF7FE07FFF7FE07F
      FF7FE07FFF7FE07FFF7F00000000000000000000000000000000000000000000
      007C007C007C000000000000000000000000000000000000FF030000E07FFF7F
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000007C007C000000000000000000000000000000000000000000000000E07F
      FF7FE07F000000000000000000000000000000007F00807F00007F00807F0000
      7F00807F00007F00807F00007F00807F00000000000000000000FF7FE07FFF7F
      E07F000000000000000000000000000000000000000000000000000000000000
      00000000007C007C000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000807F00007F00807F00007F00807F
      00007F00807F00007F00807F00007F00807F000000000000EF3D000000000000
      0000EF3D00000000000000000000000000000000000000000000000000000000
      000000000000EF3D007C00000000000000000000000000000000000000000000
      000000000000000000000000000000000000FF7FFF7FFF7FFF7FFF7FFF7FFF7F
      FF7F00007F00807F00007F00807F00007F000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000EF3D007C0000000000000000000000000000000000000000
      00000000000000000000000000000000000000007F00807F00007F00807F0000
      7F00807F00007F00807F00007F00807F00000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000007C007C00000000000000000000000000000000
      000000000000000000000000000000000000000000000000FF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F0000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000FF030000FF7FE07F
      FF7FE07FFF7FE07FFF7F0000FF7FFF7FFF7F424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFF9FF1FFFFFFFE007F0FF041FFFFFC007F0FF000FFFFFC007E07F000FFFFF
      C007C07F0007FFFFC007843F0001FFFFC0071E3F0000FFFFC007FE1F0001FFFF
      C00FFF1F003FFFFFE07FFF8FFC7F0000E07FFFC7FFFF0000FFFFFFE3FFFF7F00
      FFFFFFF8FFFF0000FFFFFFFFFFFF000000000000000000000000000000000000
      000000000000}
  end
end