zdwh.dfm

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

object zdwhForm: TzdwhForm
  Left = 218
  Top = 157
  Width = 477
  Height = 245
  Caption = '消费站点维护'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 8
    Top = 5
    Width = 141
    Height = 207
    Caption = '未选消费类型'
    TabOrder = 0
    object StringGrid1: TStringGrid
      Left = 2
      Top = 14
      Width = 137
      Height = 191
      Align = alClient
      ColCount = 1
      DefaultRowHeight = 18
      FixedCols = 0
      TabOrder = 0
      OnDblClick = StringGrid1DblClick
      ColWidths = (
        115)
    end
  end
  object add: TBitBtn
    Left = 149
    Top = 28
    Width = 59
    Height = 25
    Caption = 'ADD'
    TabOrder = 1
    OnClick = StringGrid2DblClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333FF3333333333333003333333333333F77F33333333333009033
      333333333F7737F333333333009990333333333F773337FFFFFF330099999000
      00003F773333377777770099999999999990773FF33333FFFFF7330099999000
      000033773FF33777777733330099903333333333773FF7F33333333333009033
      33333333337737F3333333333333003333333333333377333333333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object addall: TBitBtn
    Left = 149
    Top = 52
    Width = 59
    Height = 25
    Caption = 'ALL'
    TabOrder = 2
    OnClick = addallClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333FF3333333333333003333333333333F77F33333333333009033
      333333333F7737F333333333009990333333333F773337FFFFFF330099999000
      00003F773333377777770099999999999990773FF33333FFFFF7330099999000
      000033773FF33777777733330099903333333333773FF7F33333333333009033
      33333333337737F3333333333333003333333333333377333333333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object del: TBitBtn
    Left = 149
    Top = 76
    Width = 59
    Height = 25
    Caption = 'ADD'
    TabOrder = 3
    OnClick = StringGrid1DblClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333FF3333333333333003333
      3333333333773FF3333333333309003333333333337F773FF333333333099900
      33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
      99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
      33333333337F3F77333333333309003333333333337F77333333333333003333
      3333333333773333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object delall: TBitBtn
    Left = 149
    Top = 100
    Width = 59
    Height = 25
    Caption = 'ALL'
    TabOrder = 4
    OnClick = delallClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333FF3333333333333003333
      3333333333773FF3333333333309003333333333337F773FF333333333099900
      33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
      99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
      33333333337F3F77333333333309003333333333337F77333333333333003333
      3333333333773333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object GroupBox2: TGroupBox
    Left = 208
    Top = 6
    Width = 261
    Height = 207
    Caption = '已选消费类型及存放库房'
    TabOrder = 5
    object StringGrid2: TStringGrid
      Left = 2
      Top = 14
      Width = 257
      Height = 191
      Align = alClient
      ColCount = 2
      DefaultRowHeight = 18
      FixedCols = 0
      TabOrder = 0
      OnClick = StringGrid2Click
      OnDblClick = StringGrid2DblClick
      OnKeyDown = StringGrid2KeyDown
      ColWidths = (
        115
        118)
    end
    object kfm: TComboBox
      Left = 119
      Top = 35
      Width = 123
      Height = 20
      ItemHeight = 12
      TabOrder = 1
      Visible = False
      OnExit = kfmExit
    end
  end
  object BitBtn1: TBitBtn
    Left = 149
    Top = 124
    Width = 59
    Height = 25
    Caption = '确定'
    TabOrder = 6
    OnClick = BitBtn1Click
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 149
    Top = 148
    Width = 59
    Height = 25
    Caption = '取消'
    TabOrder = 7
    OnClick = FormShow
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 149
    Top = 172
    Width = 59
    Height = 25
    Caption = '退出'
    TabOrder = 8
    OnClick = BitBtn3Click
    NumGlyphs = 2
  end
  object kfh: TComboBox
    Left = 150
    Top = 3
    Width = 59
    Height = 20
    ItemHeight = 12
    TabOrder = 9
    Visible = False
  end
  object cwsys: TComboBox
    Left = 158
    Top = 3
    Width = 59
    Height = 20
    ItemHeight = 12
    TabOrder = 10
    Visible = False
  end
end