reserve.~dfm

针对快餐店的会员管理系统.具有详细的分类及管理作用

object Products: TProducts
  Left = 187
  Top = 123
  Width = 706
  Height = 414
  Caption = #20135#21697#30446#24405
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object RzPageControl1: TRzPageControl
    Left = 0
    Top = 0
    Width = 698
    Height = 380
    ActivePage = TabSheet1
    Align = alClient
    Color = 16119543
    FlatColor = 10263441
    HotTrackColor = 3983359
    ParentColor = False
    TabColors.HighlightBar = 3983359
    TabIndex = 0
    TabOrder = 0
    FixedDimension = 18
    object TabSheet1: TRzTabSheet
      Color = 16119543
      Caption = #20135#21697#30446#24405
      object cxGrid1: TcxGrid
        Tag = 2
        Left = 0
        Top = 0
        Width = 694
        Height = 358
        Align = alClient
        PopupMenu = PopupMenu1
        TabOrder = 0
        LookAndFeel.Kind = lfOffice11
        LookAndFeel.NativeStyle = False
        object cxGrid1DBTableView1: TcxGridDBTableView
          OnDblClick = cxGrid1DBTableView1DblClick
          NavigatorButtons.ConfirmDelete = False
          DataController.DataSource = DM1.DataSource5
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <
            item
              Format = #24635#38144#37327#65306'###,###'
              Kind = skSum
              FieldName = 'SellNumber'
              Column = cxGrid1DBTableView1DBColumn6
            end>
          DataController.Summary.SummaryGroups = <
            item
              Links = <
                item
                  Column = cxGrid1DBTableView1DBColumn6
                end>
              SummaryItems = <>
            end>
          OptionsBehavior.FocusCellOnTab = True
          OptionsData.Editing = False
          OptionsSelection.HideSelection = True
          OptionsView.Footer = True
          OptionsView.Indicator = True
          object cxGrid1DBTableView1ID: TcxGridDBColumn
            Caption = #20135#21697#20195#30721
            DataBinding.FieldName = 'ID'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taCenter
            Properties.ReadOnly = True
            HeaderAlignmentHorz = taCenter
            Width = 80
          end
          object cxGrid1DBTableView1DBColumn: TcxGridDBColumn
            Caption = #20135#21697#21517#31216
            DataBinding.FieldName = 'ProductName'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taLeftJustify
            Properties.ReadOnly = True
            Width = 79
          end
          object cxGrid1DBTableView1DBColumn1: TcxGridDBColumn
            Caption = #35268#26684
            DataBinding.FieldName = 'Spec'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taLeftJustify
            Properties.ReadOnly = True
            Width = 85
          end
          object cxGrid1DBTableView1DBColumn2: TcxGridDBColumn
            Caption = #21333#20301
            DataBinding.FieldName = 'Unit'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taCenter
            Properties.ReadOnly = True
            HeaderAlignmentHorz = taCenter
            Width = 50
          end
          object cxGrid1DBTableView1DBColumn3: TcxGridDBColumn
            Caption = #38144#21806#20215
            DataBinding.FieldName = 'Price'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taCenter
            Properties.ReadOnly = True
            RepositoryItem = MainForm.MoneyEdit
            HeaderAlignmentHorz = taCenter
            Width = 100
          end
          object cxGrid1DBTableView1DBColumn4: TcxGridDBColumn
            Caption = #25104#26412#20215
            DataBinding.FieldName = 'CostPrice'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taCenter
            Properties.ReadOnly = True
            RepositoryItem = MainForm.MoneyEdit
            HeaderAlignmentHorz = taCenter
            Width = 100
          end
          object cxGrid1DBTableView1DBColumn6: TcxGridDBColumn
            Caption = #38144#37327
            DataBinding.FieldName = 'SellNumber'
            RepositoryItem = MainForm.IntegerEdit
            HeaderAlignmentHorz = taCenter
            Width = 120
          end
          object cxGrid1DBTableView1DBColumn5: TcxGridDBColumn
            Caption = #22791#27880
            DataBinding.FieldName = 'Remark'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.Alignment.Horz = taLeftJustify
            Properties.ReadOnly = True
          end
        end
        object cxGrid1Level1: TcxGridLevel
          GridView = cxGrid1DBTableView1
        end
      end
    end
  end
  object PopupMenu1: TPopupMenu
    AutoHotkeys = maManual
    Images = MainForm.ImageList1
    Left = 89
    Top = 3
    object N1: TMenuItem
      Tag = 1
      Caption = #26032#22686
      Hint = #26032#22686#19968#26465#20135#21697#35760#24405
      ImageIndex = 0
      ShortCut = 16449
      OnClick = N1Click
    end
    object N2: TMenuItem
      Tag = 2
      Caption = #32534#36753
      Default = True
      Hint = #32534#36753#24403#21069#20135#21697#35760#24405
      ImageIndex = 1
      ShortCut = 16453
      OnClick = N1Click
    end
    object N3: TMenuItem
      Tag = 3
      Caption = #21024#38500
      Hint = #21024#38500#19968#26465#20135#21697#35760#24405
      ImageIndex = 3
      ShortCut = 46
      OnClick = N1Click
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object N9: TMenuItem
      Tag = 6
      Caption = #36807#28388#26174#31034
      Hint = #36807#28388#25968#25454#34920#26174#31034#30340#20869#23481
      ImageIndex = 35
      OnClick = N1Click
    end
    object N5: TMenuItem
      Tag = 4
      Caption = #22797#20301
      Hint = #22797#20301#25628#32034#21518#30340#25968#25454#24211
      ImageIndex = 36
      OnClick = N1Click
    end
    object N8: TMenuItem
      Tag = 5
      Caption = #21047#26032
      ShortCut = 116
      OnClick = N1Click
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object N7: TMenuItem
      Caption = #25171#21360#20135#21697#30446#24405
      ImageIndex = 4
      OnClick = N7Click
    end
  end
end