unit15.dfm

以学习为目的,使用DIPH开发而成,功能强大,是我们的老师提供的!

object Form15: TForm15
  Left = 204
  Top = 160
  Width = 633
  Height = 506
  Caption = '餐饮管理'
  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
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 384
    Height = 479
    Align = alClient
    AutoSize = True
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 382
      Height = 477
      Align = alClient
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'Cm'
          Title.Alignment = taCenter
          Title.Caption = '菜  名'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -12
          Title.Font.Name = '宋体'
          Title.Font.Style = []
          Width = 153
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cbjg'
          Title.Alignment = taCenter
          Title.Caption = '成本价格'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -12
          Title.Font.Name = '宋体'
          Title.Font.Style = []
          Width = 97
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Sjjg'
          Title.Alignment = taCenter
          Title.Caption = '实际价格'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -12
          Title.Font.Name = '宋体'
          Title.Font.Style = []
          Width = 97
          Visible = True
        end>
    end
  end
  object Panel2: TPanel
    Left = 384
    Top = 0
    Width = 241
    Height = 479
    Align = alRight
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 1
      Top = 113
      Width = 239
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object Panel3: TPanel
      Left = 1
      Top = 116
      Width = 239
      Height = 362
      Align = alClient
      TabOrder = 0
      object Label1: TLabel
        Left = 12
        Top = 24
        Width = 36
        Height = 12
        Caption = '菜  名'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 12
        Top = 48
        Width = 48
        Height = 12
        Caption = '成本价格'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 12
        Top = 72
        Width = 48
        Height = 12
        Caption = '实际价格'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Button1: TButton
        Left = 12
        Top = 137
        Width = 70
        Height = 23
        Caption = '增  加'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 85
        Top = 137
        Width = 70
        Height = 23
        Caption = '删  除'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 158
        Top = 137
        Width = 70
        Height = 23
        Caption = '修  改'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button3Click
      end
      object Button4: TButton
        Left = 11
        Top = 162
        Width = 70
        Height = 23
        Caption = '刷  新'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 158
        Top = 162
        Width = 70
        Height = 23
        Caption = '取  消'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = Button5Click
      end
      object DBEdit1: TDBEdit
        Left = 64
        Top = 16
        Width = 161
        Height = 21
        DataField = 'Cm'
        DataSource = DataSource1
        TabOrder = 5
      end
      object DBEdit2: TDBEdit
        Left = 64
        Top = 40
        Width = 161
        Height = 21
        DataField = 'Cbjg'
        DataSource = DataSource1
        TabOrder = 6
      end
      object DBEdit3: TDBEdit
        Left = 64
        Top = 64
        Width = 161
        Height = 21
        DataField = 'Sjjg'
        DataSource = DataSource1
        TabOrder = 7
      end
    end
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 239
      Height = 112
      Align = alTop
      TabOrder = 1
      object Label4: TLabel
        Left = 32
        Top = 24
        Width = 60
        Height = 12
        Caption = '请输入菜名'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Edit1: TEdit
        Left = 32
        Top = 48
        Width = 185
        Height = 20
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object Button6: TButton
        Left = 147
        Top = 75
        Width = 70
        Height = 23
        Caption = '查  找'
        Default = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button6Click
      end
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = '.\data'
    TableName = '菜价表.DB'
    Left = 576
    Top = 312
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 544
    Top = 312
  end
end