bingzhouu.dfm

日昌餐饮管理系统是用Delphi7+SQL写的管理系统

object bingzhouf: Tbingzhouf
  Left = 189
  Top = 125
  Width = 494
  Height = 389
  Caption = 'bingzhouf'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel2: TBevel
    Left = 241
    Top = 0
    Width = 233
    Height = 317
  end
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 233
    Height = 316
  end
  object Label1: TLabel
    Left = 84
    Top = 8
    Width = 72
    Height = 13
    Caption = #24453#24182#20043#21381#21488#21495
  end
  object Label2: TLabel
    Left = 303
    Top = 8
    Width = 72
    Height = 13
    Caption = #24182#20837#20043#21381#21488#21495
  end
  object Edit1: TEdit
    Left = 60
    Top = 32
    Width = 121
    Height = 21
    Enabled = False
    TabOrder = 0
  end
  object Edit2: TEdit
    Left = 295
    Top = 32
    Width = 121
    Height = 21
    Enabled = False
    TabOrder = 1
  end
  object TreeView1: TTreeView
    Left = 8
    Top = 60
    Width = 213
    Height = 249
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -19
    Font.Name = #23435#20307
    Font.Style = []
    Indent = 19
    ParentFont = False
    TabOrder = 2
    OnClick = TreeView1Click
  end
  object TreeView2: TTreeView
    Left = 251
    Top = 60
    Width = 213
    Height = 249
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -19
    Font.Name = #23435#20307
    Font.Style = []
    Indent = 19
    ParentFont = False
    TabOrder = 3
    OnClick = TreeView2Click
  end
  object BitBtn1: TBitBtn
    Left = 144
    Top = 328
    Width = 79
    Height = 27
    Caption = #30830#35748
    TabOrder = 4
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 264
    Top = 328
    Width = 79
    Height = 27
    Caption = #21462#28040
    TabOrder = 5
    Kind = bkCancel
  end
  object ADOQuery1: TADOQuery
    Connection = mainForm.RJSADO
    Parameters = <>
    SQL.Strings = (
      'select * '
      'from cantai'
      'where twzt<>'#39'K'#39)
    Left = 184
    Top = 56
    object ADOQuery1id: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOQuery1ctbh: TStringField
      FieldName = 'ctbh'
      Size = 10
    end
    object ADOQuery1ctmc: TStringField
      FieldName = 'ctmc'
      Size = 50
    end
    object ADOQuery1twbh: TStringField
      FieldName = 'twbh'
      Size = 10
    end
    object ADOQuery1twmc: TStringField
      FieldName = 'twmc'
      Size = 50
    end
    object ADOQuery1twrs: TIntegerField
      FieldName = 'twrs'
    end
    object ADOQuery1twfwf: TBCDField
      FieldName = 'twfwf'
      Precision = 10
    end
    object ADOQuery1twcwf: TBCDField
      FieldName = 'twcwf'
      Precision = 10
    end
    object ADOQuery1twzt: TStringField
      FieldName = 'twzt'
      Size = 1
    end
    object ADOQuery1djh: TIntegerField
      FieldName = 'djh'
    end
    object ADOQuery1kssj: TDateTimeField
      FieldName = 'kssj'
    end
    object ADOQuery1xfje: TBCDField
      FieldName = 'xfje'
      Precision = 10
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 232
    Top = 40
  end
end