guestselectunit.dfm

东华休闲山庄洗浴、餐饮、客房管理系统

object GuestSelectForm: TGuestSelectForm
  Left = 285
  Top = 255
  Width = 601
  Height = 221
  BorderIcons = []
  Caption = #23458#21490#26723#26696
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object sdbgrd1: TsuiDBGrid
    Left = 0
    Top = 0
    Width = 593
    Height = 194
    Align = alClient
    BorderStyle = bsNone
    Color = clWhite
    DataSource = ds2
    FixedColor = 10504772
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWhite
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = sdbgrd1CellClick
    OnDrawColumnCell = sdbgrd1DrawColumnCell
    UIStyle = DeepBlue
    BorderColor = clBlack
    FocusedColor = clGreen
    SelectedColor = clYellow
    FontColor = clBlack
    TitleFontColor = clWhite
    FixedBGColor = 10504772
    BGColor = clWhite
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'ID'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Caption = #23458#21490'ID'
        Title.Color = 15263976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 60
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'name'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Caption = #23486#23458#22995#21517
        Title.Color = 15263976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 80
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'sex'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Caption = #23486#23458#24615#21035
        Title.Color = 15263976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 70
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'phone'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Caption = #32852#31995#30005#35805
        Title.Color = 15263976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 120
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cardtype'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Caption = #35777#20214#31867#22411
        Title.Color = 15263976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 70
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cardnum'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Caption = #35777#20214#32534#21495
        Title.Color = 15263976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlack
        Title.Font.Height = -13
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 150
        Visible = True
      end>
  end
  object ds1: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspRoomGuest'
    RemoteServer = LoginForm.SocketConnection1
    Left = 8
    Top = 40
  end
  object ds2: TDataSource
    DataSet = ds1
    Left = 40
    Top = 40
  end
end