c_ydb.dfm

经典的酒店管理系统

inherited YdbForm: TYdbForm
  Left = 144
  Top = 85
  Width = 600
  Height = 450
  ActiveControl = edtYdrq
  Caption = #39044#23450#34920
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    Width = 592
    Height = 90
    inherited lblTitle: TLabel
      Left = 243
    end
    inherited Image1: TImage
      Left = 209
    end
    object SpeedButton1: TSpeedButton [2]
      Left = 119
      Top = 60
      Width = 23
      Height = 22
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        003337777777777777F330FFFFFFFFFFF03337F3333FFF3337F330FFFF000FFF
        F03337F33377733337F330FFFFF0FFFFF03337F33337F33337F330FFFF00FFFF
        F03337F33377F33337F330FFFFF0FFFFF03337F33337333337F330FFFFFFFFFF
        F03337FFF3F3F3F3F7F33000F0F0F0F0F0333777F7F7F7F7F7F330F0F000F070
        F03337F7F777F777F7F330F0F0F0F070F03337F7F7373777F7F330F0FF0FF0F0
        F03337F733733737F7F330FFFFFFFF00003337F33333337777F330FFFFFFFF0F
        F03337FFFFFFFF7F373330999999990F033337777777777F733330FFFFFFFF00
        333337FFFFFFFF77333330000000000333333777777777733333}
      NumGlyphs = 2
      OnClick = SpeedButton1Click
    end
    object Label5: TLabel [3]
      Left = 16
      Top = 45
      Width = 48
      Height = 12
      Caption = #26597#35810#26085#26399
    end
    inherited DBNavPlus1: TDBNavPlus
      Left = 227
      Hints.Strings = ()
      TabOrder = 1
      Visible = False
    end
    inherited DBNavPlus2: TDBNavPlus [5]
      Left = 427
      Hints.Strings = ()
      TabOrder = 6
      Visible = False
    end
    inherited lblState: TStaticText [6]
      Left = 510
      TabOrder = 7
      Visible = False
    end
    inherited cmbOption: TComboBox [7]
      Left = 146
      Top = 61
      ItemIndex = 0
      TabOrder = 2
      Text = #39033#30446#21517#31216
      Items.Strings = (
        #39033#30446#21517#31216)
    end
    inherited cmbExpress: TComboBox [8]
      Left = 246
      Top = 61
      TabOrder = 3
    end
    inherited edtValue: TEdit [9]
      Left = 346
      Top = 61
      TabOrder = 4
    end
    inherited btnLoca: TBitBtn [10]
      Left = 500
      Top = 58
      TabOrder = 5
      OnClick = btnLocaClick
    end
    object edtYdrq: TMaskEdit
      Left = 17
      Top = 61
      Width = 100
      Height = 20
      EditMask = '!0000/99/99;1; '
      MaxLength = 10
      TabOrder = 0
      Text = '    -  -  '
    end
  end
  inherited Panel2: TPanel
    Top = 90
    Width = 592
    Height = 292
    inherited Bevel1: TBevel
      Width = 572
      Height = 272
    end
    object PageControl1: TPageControl
      Left = 10
      Top = 10
      Width = 572
      Height = 272
      ActivePage = TabSheet1
      Align = alClient
      HotTrack = True
      Images = ImageList1
      MultiLine = True
      TabIndex = 0
      TabOrder = 0
      object TabSheet1: TTabSheet
        Caption = #35814#32454#24773#20917
        object dbgYdb: TDBGrid
          Left = 0
          Top = 0
          Width = 564
          Height = 243
          Align = alClient
          DataSource = dsWork
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnDblClick = dbgYdbDblClick
          Columns = <
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_XMMC'
              Title.Alignment = taCenter
              Title.Caption = #39033#30446#21517#31216
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_YDRQ'
              Title.Alignment = taCenter
              Title.Caption = #39044#23450#26085#26399
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_YDSJ'
              Title.Alignment = taCenter
              Title.Caption = #39044#23450#26102#38388
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_XM'
              Title.Alignment = taCenter
              Title.Caption = #22995#21517
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_DWMC'
              Title.Alignment = taCenter
              Title.Caption = #21333#20301#21517#31216
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_SL'
              Title.Alignment = taCenter
              Title.Caption = #25968#37327
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_DJ'
              Title.Alignment = taCenter
              Title.Caption = #21333#20215
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_JE'
              Title.Alignment = taCenter
              Title.Caption = #37329#39069
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False