📄 gzglunit.dfm

📁 东华休闲山庄洗浴、餐饮、客房管理系统
💻 DFM
📖 第 1 页 / 共 2 页
字号:
12 下一页
object GZGLForm: TGZGLForm
  Left = 22
  Top = 102
  Width = 981
  Height = 611
  BorderIcons = []
  Caption = #24050#25346#36134#21333#32467#36134
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object suiPanel1: TsuiPanel
    Left = 0
    Top = 0
    Width = 973
    Height = 95
    UIStyle = MacOS
    BorderColor = 8355711
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    Caption = #25346#36134#25805#20316#21306
    ShowButton = False
    CaptionFontColor = clBlack
    Align = alTop
    TabOrder = 0
    Color = clWhite
    object lbl1: TLabel
      Left = 168
      Top = 32
      Width = 60
      Height = 14
      Caption = #26597#35810#31867#22411
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lbl2: TLabel
      Left = 408
      Top = 32
      Width = 60
      Height = 14
      Caption = #26597#35810#25968#25454
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lbl3: TLabel
      Left = 256
      Top = 64
      Width = 60
      Height = 14
      Caption = #32467#36134#37329#39069
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object suiComboBox1: TsuiComboBox
      Left = 240
      Top = 32
      Width = 145
      Height = 22
      UIStyle = DeepBlue
      BorderColor = clBlack
      ArrowColor = clBlack
      ButtonColor = 15263976
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ItemHeight = 14
      ParentFont = False
      TabOrder = 0
      Text = #32467#36134#21333
      OnKeyPress = suiComboBox1KeyPress
      OnSelect = suiComboBox1Select
      Items.Strings = (
        #32467#36134#21333
        #23486#23458#22995#21517)
    end
    object suiEdit1: TsuiEdit
      Left = 320
      Top = 64
      Width = 145
      Height = 20
      UIStyle = DeepBlue
      BorderColor = clBlack
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      Text = 'suiEdit1'
    end
    object btn1: TsuiButton
      Left = 648
      Top = 32
      Width = 73
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      Caption = #26597#35810
      AutoSize = False
      ParentFont = False
      UIStyle = WinXP
      TabOrder = 2
      Transparent = False
      ModalResult = 0
      FocusedRectMargin = 2
      Layout = blGlyphLeft
      Spacing = 4
      MouseContinuouslyDownInterval = 100
      OnClick = btn1Click
      ResHandle = 0
    end
    object btn2: TsuiButton
      Left = 472
      Top = 64
      Width = 73
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      Caption = #32467#36134
      AutoSize = False
      ParentFont = False
      UIStyle = WinXP
      TabOrder = 3
      Transparent = False
      ModalResult = 0
      FocusedRectMargin = 2
      Layout = blGlyphLeft
      Spacing = 4
      MouseContinuouslyDownInterval = 100
      ResHandle = 0
    end
    object btn3: TsuiButton
      Left = 552
      Top = 64
      Width = 73
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      Caption = #36864#20986
      AutoSize = False
      ParentFont = False
      UIStyle = WinXP
      TabOrder = 4
      Transparent = False
      ModalResult = 0
      FocusedRectMargin = 2
      Layout = blGlyphLeft
      Spacing = 4
      MouseContinuouslyDownInterval = 100
      OnClick = btn3Click
      ResHandle = 0
    end
    object suiComboBox2: TsuiComboBox
      Left = 480
      Top = 32
      Width = 145
      Height = 22
      UIStyle = DeepBlue
      BorderColor = clBlack
      ArrowColor = clBlack
      ButtonColor = 15263976
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ItemHeight = 14
      ParentFont = False
      TabOrder = 5
      Text = 'suiComboBox1'
      OnDropDown = suiComboBox2DropDown
      OnKeyPress = suiComboBox2KeyPress
      OnSelect = suiComboBox2Select
    end
  end
  object suiPanel2: TsuiPanel
    Left = 0
    Top = 264
    Width = 973
    Height = 320
    UIStyle = MacOS
    BorderColor = 8355711
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    Caption = #28040#36153#28165#21333
    ShowButton = False
    CaptionFontColor = clBlack
    Align = alBottom
    TabOrder = 1
    Color = clWhite
    object DBGrid1: TDBGrid
      Left = 4
      Top = 25
      Width = 965
      Height = 291
      Align = alClient
      DataSource = ds1
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDrawColumnCell = DBGrid1DrawColumnCell
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_sph'
          Title.Alignment = taCenter
          Title.Caption = #23458#25151#21495
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 50
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_xfxm'
          Title.Alignment = taCenter
          Title.Caption = #28040#36153#39033#30446
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 120
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_xmdj'
          Title.Alignment = taCenter
          Title.Caption = #39033#30446#21333#20215
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 90
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'lbxf_dzbl'
          Title.Alignment = taCenter
          Title.Caption = #25171#25240#27604#20363
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 90
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_xfsl'
          Title.Alignment = taCenter
          Title.Caption = #28040#36153#25968#37327
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 90
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_xfje'
          Title.Alignment = taCenter
          Title.Caption = #28040#36153#24635#39069
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 90
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_xfBegin'
          Title.Alignment = taCenter
          Title.Caption = #28040#36153#26102#38388
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 160
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'lbxf_jjdw'
          Title.Alignment = taCenter
          Title.Caption = #35760#36134#26041#24335
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 125
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Lbxf_jzr'
          Title.Alignment = taCenter
          Title.Caption = #35760#36134#20154
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Width = 100
          Visible = True
        end>
    end
  end
  object suiPanel3: TsuiPanel
    Left = 0
    Top = 95
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -