xtrzut.~dfm

宾馆客房管理系统,功能强大,界面美观,全部delphi源代码

object xtrzfm: Txtrzfm
  Left = 278
  Top = 198
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #31995#32479#26085#24535#21644#25968#25454#32500#25252#31649#29702
  ClientHeight = 289
  ClientWidth = 454
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 454
    Height = 289
    ActivePage = TabSheet3
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #31995#32479#26085#24535
      object Panel1: TPanel
        Left = 0
        Top = 216
        Width = 446
        Height = 45
        Align = alBottom
        TabOrder = 0
        object BitBtn1: TBitBtn
          Left = 80
          Top = 8
          Width = 75
          Height = 25
          Caption = #28165#31354#26085#24535
          TabOrder = 0
          OnClick = BitBtn1Click
        end
        object BitBtn2: TBitBtn
          Left = 224
          Top = 8
          Width = 75
          Height = 25
          Caption = #20851#38381
          TabOrder = 1
          OnClick = BitBtn2Click
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 446
        Height = 216
        Align = alClient
        TabOrder = 1
        object DBGrid1: TDBGrid
          Left = 1
          Top = 1
          Width = 444
          Height = 214
          Align = alClient
          DataSource = DataSource1
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #25968#25454#32500#25252
      ImageIndex = 1
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 425
        Height = 201
        TabOrder = 0
        object Label1: TLabel
          Left = 32
          Top = 72
          Width = 105
          Height = 17
          AutoSize = False
          Caption = #36873#25321#21024#38500#26102#38388#65306
        end
        object Label2: TLabel
          Left = 252
          Top = 77
          Width = 73
          Height = 25
          AutoSize = False
          Caption = #22825#20197#21069
        end
        object Label3: TLabel
          Left = 24
          Top = 136
          Width = 393
          Height = 49
          AutoSize = False
          Caption = #27880#24847#65306#31995#32479#23558#26681#25454#20320#36873#25321#30340#22825#25968#21024#38500#36873#25321#30340#22825#25968#20197#21069#30340#25968#25454
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object sj: TComboBox
          Left = 152
          Top = 72
          Width = 89
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          ItemHeight = 13
          TabOrder = 0
          Items.Strings = (
            '100'
            '200'
            '365'
            '400'
            '500'
            '600'
            '700'
            '800'
            '900'
            '1000')
        end
      end
      object BitBtn3: TBitBtn
        Left = 72
        Top = 216
        Width = 75
        Height = 25
        Caption = #25968#25454#22788#29702
        TabOrder = 1
        OnClick = BitBtn3Click
      end
      object BitBtn4: TBitBtn
        Left = 240
        Top = 216
        Width = 75
        Height = 25
        Caption = #20851#38381
        TabOrder = 2
        OnClick = BitBtn4Click
      end
    end
    object TabSheet3: TTabSheet
      Caption = #31995#32479#21021#22987#21270
      ImageIndex = 2
      object BitBtn5: TBitBtn
        Left = 112
        Top = 96
        Width = 209
        Height = 41
        Caption = #24320#22987#21021#22987#21270
        TabOrder = 0
        OnClick = BitBtn5Click
      end
    end
  end
  object rzado: TADOQuery
    Connection = DataFm.datacon
    Parameters = <>
    Left = 252
    Top = 128
  end
  object DataSource1: TDataSource
    DataSet = rzado
    Left = 172
    Top = 136
  end
  object sjclado: TADOQuery
    Connection = DataFm.datacon
    Parameters = <>
    Left = 268
    Top = 64
  end
end