menuform.dfm

本程序是一个餐饮业的管理软件

object FrmMenu: TFrmMenu
  Left = 230
  Top = 144
  BorderStyle = bsToolWindow
  Caption = #33756#21333#35774#32622
  ClientHeight = 409
  ClientWidth = 619
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 617
    Height = 409
    Caption = #28155#21152#33756#21333
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 35
      Height = 13
      Caption = #33756'ID'#65306
    end
    object Label2: TLabel
      Left = 16
      Top = 56
      Width = 36
      Height = 13
      Caption = #33756#21517#65306
    end
    object Label3: TLabel
      Left = 16
      Top = 88
      Width = 36
      Height = 13
      Caption = #31867#22411#65306
    end
    object Label4: TLabel
      Left = 16
      Top = 120
      Width = 36
      Height = 13
      Caption = #35268#26684#65306
    end
    object Label5: TLabel
      Left = 328
      Top = 24
      Width = 36
      Height = 13
      Caption = #20215#26684#65306
    end
    object Label6: TLabel
      Left = 328
      Top = 56
      Width = 36
      Height = 13
      Caption = #25240#25187#65306
    end
    object Label7: TLabel
      Left = 328
      Top = 88
      Width = 36
      Height = 13
      Caption = #22791#27880#65306
    end
    object DBGrid1: TDBGrid
      Left = 0
      Top = 176
      Width = 617
      Height = 233
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'ID'
          Width = 30
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Name'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Type'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Specs'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Price'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Discount'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Memo'
          Visible = True
        end>
    end
    object DBEdit1: TDBEdit
      Left = 80
      Top = 16
      Width = 161
      Height = 21
      DataField = 'ID'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit2: TDBEdit
      Left = 80
      Top = 48
      Width = 161
      Height = 21
      DataField = 'Name'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 2
    end
    object DBEdit3: TDBEdit
      Left = 392
      Top = 16
      Width = 185
      Height = 21
      DataField = 'Price'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 3
    end
    object DBComboBox1: TDBComboBox
      Left = 80
      Top = 80
      Width = 161
      Height = 21
      DataField = 'Type'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      Items.Strings = (
        #20937#33756
        #20919#21697
        #29980#21697
        #27700#26524
        #28909#33756
        #23478#24120
        #29305#33394
        #37202#27700
        #20027#39135)
      TabOrder = 4
    end
    object DBComboBox2: TDBComboBox
      Left = 80
      Top = 112
      Width = 161
      Height = 21
      DataField = 'Specs'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      Items.Strings = (
        #30424
        #30871
        #38149
        #21482
        #26020
        #20811
        #26742
        #26479)
      TabOrder = 5
    end
    object DBEdit4: TDBEdit
      Left = 392
      Top = 48
      Width = 185
      Height = 21
      DataField = 'Discount'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 6
    end
    object DBMemo1: TDBMemo
      Left = 392
      Top = 80
      Width = 185
      Height = 57
      DataField = 'Memo'
      DataSource = Data.DataSMenu
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 7
    end
    object DBNavigator1: TDBNavigator
      Left = 168
      Top = 144
      Width = 270
      Height = 26
      DataSource = Data.DataSMenu
      TabOrder = 8
    end
  end
end