frm_tableu.dfm

快餐店管理系统 很好的参考材料 谢谢您的合作

inherited frm_table: Tfrm_table
  Left = 211
  Top = 115
  Caption = #26700#20301#20449#24687
  ClientHeight = 573
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 288
    Top = 480
    Width = 49
    Height = 13
    AutoSize = False
    Caption = #21517#31216
  end
  object Label3: TLabel [1]
    Left = 288
    Top = 504
    Width = 49
    Height = 13
    AutoSize = False
    Caption = #21333#20215
  end
  object Label2: TLabel [2]
    Left = 16
    Top = 504
    Width = 49
    Height = 13
    AutoSize = False
    Caption = #20221#25968
  end
  object Label4: TLabel [3]
    Left = 16
    Top = 480
    Width = 49
    Height = 13
    AutoSize = False
    Caption = #31181#31867
  end
  object Label5: TLabel [4]
    Left = 200
    Top = 248
    Width = 41
    Height = 13
    AutoSize = False
    Caption = #26700#21495
  end
  object Label6: TLabel [5]
    Left = 200
    Top = 272
    Width = 36
    Height = 13
    Caption = #21512#35745#65306
  end
  object lab_allfee: TLabel [6]
    Left = 256
    Top = 272
    Width = 121
    Height = 13
    AutoSize = False
    Caption = '0'
  end
  object Label7: TLabel [7]
    Left = 16
    Top = 272
    Width = 65
    Height = 13
    AutoSize = False
    Caption = #20854#23427#36153#29992
  end
  object Label10: TLabel [8]
    Left = 440
    Top = 504
    Width = 33
    Height = 13
    AutoSize = False
    Caption = #21482#35835
  end
  object Label8: TLabel [9]
    Left = 40
    Top = 16
    Width = 73
    Height = 13
    AutoSize = False
    Caption = #26174#31034#31867#22411
  end
  inherited DBGrid_info: TDBGrid
    Left = 16
    Top = 296
    Height = 169
    OnCellClick = DBGrid_infoCellClick
  end
  inherited btn_add: TButton
    Left = 160
    Top = 536
    OnClick = btn_addClick
  end
  inherited btn_del: TButton
    Left = 256
    Top = 536
    OnClick = btn_delClick
  end
  inherited btn_edit: TButton
    Left = 352
    Top = 536
    OnClick = btn_editClick
  end
  inherited btn_exit: TButton
    Left = 448
    Top = 536
  end
  object edt_name: TEdit [15]
    Left = 344
    Top = 480
    Width = 121
    Height = 21
    TabOrder = 5
    OnExit = edt_nameExit
  end
  object edt_price: TEdit [16]
    Left = 344
    Top = 504
    Width = 89
    Height = 21
    ReadOnly = True
    TabOrder = 6
  end
  object edt_num: TEdit [17]
    Left = 80
    Top = 504
    Width = 121
    Height = 21
    TabOrder = 7
    OnKeyPress = edt_numKeyPress
  end
  object rb_dish: TRadioButton [18]
    Left = 80
    Top = 480
    Width = 49
    Height = 17
    Caption = #33756
    Checked = True
    TabOrder = 8
    TabStop = True
  end
  object rb_drink: TRadioButton [19]
    Left = 136
    Top = 480
    Width = 49
    Height = 17
    Caption = #37202#27700
    TabOrder = 9
  end
  object DBGrid_table: TDBGrid [20]
    Left = 16
    Top = 48
    Width = 553
    Height = 193
    DataSource = DataSource_table
    ReadOnly = True
    TabOrder = 10
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = DBGrid_tableCellClick
  end
  object btn_begin: TButton [21]
    Left = 392
    Top = 248
    Width = 75
    Height = 25
    Caption = #24320#21333
    TabOrder = 11
    OnClick = btn_beginClick
  end
  object btn_end: TButton [22]
    Left = 480
    Top = 248
    Width = 75
    Height = 25
    Caption = #32467#24080
    TabOrder = 12
    OnClick = btn_endClick
  end
  object edt_tableNo: TEdit [23]
    Left = 256
    Top = 248
    Width = 121
    Height = 21
    TabOrder = 13
  end
  object edt_otherfee: TEdit [24]
    Left = 96
    Top = 272
    Width = 89
    Height = 21
    TabOrder = 14
    Text = '0'
    OnExit = edt_otherfeeExit
    OnKeyPress = edt_otherfeeKeyPress
  end
  object cbx_type: TComboBox [25]
    Left = 120
    Top = 16
    Width = 145
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 15
    Text = #20840#37096
    OnChange = cbx_typeChange
    Items.Strings = (
      #20840#37096
      #26410#32467#24080
      #24050#32467#24080)
  end
  inherited DataSource_info: TDataSource
    Left = 400
    Top = 344
  end
  object DataSource_table: TDataSource
    Left = 424
    Top = 104
  end
end