tclbxz.dfm

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

object tclbForm: TtclbForm
  Left = 49
  Top = 117
  Width = 553
  Height = 368
  BorderIcons = [biSystemMenu]
  Caption = #25353#31867#21035#36873#25321#37197#39184
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 66
    Top = 0
    Width = 84
    Height = 12
    Caption = #35831#36873#25321#37197#39184#31867#21035
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 16
    Top = 244
    Width = 192
    Height = 12
    Caption = #20174#25152#36873#25321#30340#31867#21035#20013#26368#22810#21487#36873#39184#21697#25968#37327
  end
  object CheckListBox1: TCheckListBox
    Left = 0
    Top = 20
    Width = 257
    Height = 209
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ItemHeight = 16
    ParentFont = False
    TabOrder = 0
  end
  object Edit1: TEdit
    Left = 56
    Top = 268
    Width = 121
    Height = 20
    TabOrder = 1
    OnKeyPress = Edit1KeyPress
  end
  object BitBtn1: TBitBtn
    Left = 24
    Top = 300
    Width = 75
    Height = 41
    Caption = #21152#20837
    Default = True
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 112
    Top = 300
    Width = 75
    Height = 41
    Cancel = True
    Caption = #36820#22238
    ModalResult = 2
    TabOrder = 3
    Glyph.Data = {
      360C0000424D360C000000000000360000002800000020000000200000000100
      180000000000000C000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      3399993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      3399993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999999999
      3399993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999999999990000
      0099993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999933999933999933999933999933999933999933999999999999000000FFFF
      0000000099993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999999999999933999933999933999933999999999999000000FFFF00FFFF
      00FFFF0000000099993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000999999999933999933999999999999000000FFFF00FFFF00FFFF
      00FFFF00FFFF0000000099993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000000000999999999999999999000000FFFF00FFFF00FFFF00FFFF
      00FFFF00FFFF0099993300000099993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00000000999999000000FFFF00FFFF00FFFF00FFFF00FFFF
      00FFFF0099993300000099993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00FFFF00000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
      0099993300000099993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF009999
      3300000099993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF009999330000
      0099993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF009999330000009999
      3399993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF000000009999339999
      3399993399993399999999999999999999999999999999999999999999999999
      9999999999999999999933999933999933999933999933FFFFFF000000999933
      999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF000000009999
      3399993399993399999900000000000000000000000000000000000000000000
      0000000000000000000000999933999933999933999933FFFFFF000000999933
      9999990000009999339999339999339999339999339999339999339999330000
      00999933999933999933999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00999933000000999933999933999933999933FFFFFF000000999933
      9999330000000000000000000000000000000000000000000000000000000000
      00000000999933999933999933999999000000FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999933999933999933999933999999999999000000FFFF00FFFF00FFFF00FF
      FF00FFFF00999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999933999933999933999999999999000000FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999933999933999999999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FF
      FF00FFFF00999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999933999999999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF0099
      9933FFFF00999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999999999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF0099993300
      0000999933999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      99999999000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF0099993300000099
      9933000000999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      99000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF0099993300000099993399
      9933999933000000000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999999000000FFFF00FFFF00FFFF00FFFF0099993300000099993399993399
      9933999933999933000000999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      33999933999999000000FFFF00FFFF0099993300000099993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      3399993399993399999900000099993300000099993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      3399993399993399993399993300000099993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      3399993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000999933
      9999339999339999339999339999339999339999339999339999339999339999
      3399993399993399993399993399993399993399993399993399993399993399
      9933999933999933999933999933999933999933999933FFFFFF000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  end
  object DBGrid2: TDBGrid
    Left = 272
    Top = 17
    Width = 273
    Height = 320
    Hint = #21452#20987#21024#38500#35813#35760#24405
    DataSource = DataSource2
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = DBGrid2DblClick
    Columns = <
      item
        Expanded = False
        FieldName = 'zcbh'
        Title.Caption = #20027#39184#32534#21495
        Width = 51
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'pclb'
        Title.Caption = #37197#39184#31867#21035#32534#21495
        Width = 149
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sl'
        Title.Caption = #25968#37327
        Width = 36
        Visible = True
      end>
  end
  object Query2: TQuery
    CachedUpdates = True
    DatabaseName = 'aa'
    SQL.Strings = (
      'select *'
      'from tcwj'
      'where zcbh=:cs and pcbh='#39#39)
    UpdateObject = UpdateSQL1
    Left = 376
    Top = 96
    ParamData = <
      item
        DataType = ftString
        Name = 'cs'
        ParamType = ptUnknown
      end>
  end
  object UpdateSQL1: TUpdateSQL
    ModifySQL.Strings = (
      'update tcwj'
      'set'
      '  zcbh = :zcbh,'
      '  pcbh = :pcbh,'
      '  pclb = :pclb,'
      '  sl = :sl'
      'where'
      '  id = :OLD_id')
    InsertSQL.Strings = (
      'insert into tcwj'
      '  (zcbh, pcbh, pclb, sl)'
      'values'
      '  (:zcbh, :pcbh, :pclb, :sl)')
    DeleteSQL.Strings = (
      'delete from tcwj'
      'where'
      '  id = :OLD_id')
    Left = 408
    Top = 96
  end
  object DataSource2: TDataSource
    DataSet = Query2
    Left = 440
    Top = 96
  end
end