unt_viewmoney.dfm

酒店资源管理的软件

object ViewMoneyForm: TViewMoneyForm
  Left = 320
  Top = 200
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #24403#26085#25910#25903#26597#35810
  ClientHeight = 362
  ClientWidth = 438
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 5
    Top = 1
    Width = 431
    Height = 313
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'bookno'
        Title.Caption = #35746#25151#32534#21495
        Width = 57
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'roomno'
        Title.Caption = #23458#25151#32534#21495
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'name'
        Title.Caption = #23458#20154#21517#31216
        Width = 61
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'certi_no'
        Title.Caption = #35777#20214#32534#21495
        Width = 58
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'factfee'
        Title.Caption = #23454#25910#37329#39069
        Width = 59
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'note'
        Title.Caption = #35828#26126
        Width = 51
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'oper_date'
        Title.Caption = #26085#26399
        Width = 59
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'operator'
        Title.Caption = #25805#20316#20154
        Visible = True
      end>
  end
  object BitBtn2: TBitBtn
    Left = 247
    Top = 329
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 1
    OnClick = BitBtn2Click
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      18000000000000030000C40E0000C40E00000000000000000000FFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000
      0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFF00000000000084A7B9000000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000437B97437B9784A7B900
      0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000
      437B9735586A35586A437B9784A7B9000000000000000000FFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFF000000437B9735586A35586A437B9784A7B900
      0000282828000000FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF000000
      437B9735586A35586A00FF0084A7B9000000282828000000FFFFFF0000000000
      00FFFFFFFFFFFFFFFFFFFFFFFF000000437B97437B97437B9700FFFF84A7B900
      0000282828000000000000B7A17F000000000000000000000000FFFFFF000000
      437B9735586A35586A00FF0084A7B9000000282828000000B7A17FB7A17FB7A1
      7FB7A17FB7A17F000000FFFFFF000000437B9735586A35586A437B9784A7B900
      0000000000B7A17FB7A17FB7A17FB7A17FB7A17FB7A17F000000FFFFFF000000
      437B9735586A35586A437B9784A7B9000000282828000000B7A17FB7A17FB7A1
      7FB7A17FB7A17F000000FFFFFF000000437B97437B97437B9784A7B984A7B949
      5459282828000000000000B7A17F000000000000000000000000FFFFFF000000
      437B9784A7B984A7B9495459495459282828282828000000FFFFFF0000000000
      00FFFFFFFFFFFFFFFFFFFFFFFF00000084A7B949545949545928282828282828
      2828282828000000FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  end
  object ADOTable1: TADOTable
    Connection = checkuserform.ADOConnection1
    CursorType = ctStatic
    TableName = 'Dtsztable'
    Left = 29
    Top = 48
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 81
    Top = 115
  end
end