⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mainunit.~dfm

📁 东华休闲山庄洗浴、餐饮、客房管理系统
💻 ~DFM
📖 第 1 页 / 共 5 页
字号:
      Color = clWhite
      object dbgrd1: TDBGrid
        Left = 4
        Top = 25
        Width = 773
        Height = 77
        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 = dbgrd1DrawColumnCell
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lbxf_xfxm'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #28040#36153#39033#30446
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 90
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lbxf_xmdj'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #39033#30446#21333#20215
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 85
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'lbxf_dzbl'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #25171#25240#27604#20363
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 70
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lbxf_xfsl'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #28040#36153#25968#37327
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 70
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lbxf_xfje'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #28040#36153#24635#39069
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 70
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lbxf_xfBegin'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #28040#36153#26102#38388
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 150
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'lbxf_jjdw'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #35760#36134#26041#24335
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 120
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lbxf_jzr'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            Title.Alignment = taCenter
            Title.Caption = #35760#36134#20154
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = [fsBold]
            Width = 80
            Visible = True
          end>
      end
    end
    object lv1: TsuiListView
      Left = 1
      Top = 1
      Width = 781
      Height = 505
      UIStyle = DeepBlue
      BorderColor = clBlack
      Align = alClient
      BorderStyle = bsNone
      BorderWidth = 2
      Columns = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      IconOptions.WrapText = False
      Items.Data = {
        C80000000800000000000000FFFFFFFFFFFFFFFF000000000000000003303031
        01000000FFFFFFFFFFFFFFFF00000000000000000330303202000000FFFFFFFF
        FFFFFFFF00000000000000000330303303000000FFFFFFFFFFFFFFFF00000000
        000000000330303400000000FFFFFFFFFFFFFFFF000000000000000003303035
        00000000FFFFFFFFFFFFFFFF00000000000000000330303600000000FFFFFFFF
        FFFFFFFF00000000000000000330303700000000FFFFFFFFFFFFFFFF00000000
        0000000003303038}
      LargeImages = il2
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      TabOrder = 1
      OnClick = lv1Click
    end
  end
  object mm1: TMainMenu
    Left = 256
    Top = 272
    object N1: TMenuItem
      AutoHotkeys = maAutomatic
      AutoLineReduction = maAutomatic
      Caption = #26469#23486#30331#35760'(&B)'
      object N4: TMenuItem
        Caption = #39038#23458#24320#21333'(&G)'
        OnClick = btn1Click
      end
      object N5: TMenuItem
        Caption = #20462#25913#30331#35760'(&J)'
        OnClick = N5Click
      end
      object A1: TMenuItem
        Caption = #26356#25442#25163#29260'(&A)'
        OnClick = A1Click
      end
      object Z2: TMenuItem
        Caption = #25163#29260#29366#24577'(&Z)'
        OnClick = Z2Click
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object N53: TMenuItem
        Caption = #39044#35746#31649#29702'(&Y)'
        OnClick = btn4Click
      end
      object O1: TMenuItem
        Caption = #38145#23450#23631#24149'(&O)'
        OnClick = O1Click
      end
      object N52: TMenuItem
        Caption = '-'
      end
      object N8: TMenuItem
        Caption = #36864#20986#31995#32479'(&X)'
        OnClick = N8Click
      end
    end
    object N2: TMenuItem
      Caption = #25910#38134#32467#31639'(&S)'
      object J1: TMenuItem
        Caption = #23486#23458#32467#36134'(&J)'
        OnClick = btn3Click
      end
      object N9: TMenuItem
        Caption = #21512#24182#36134#21333'(&E)'
        OnClick = N9Click
      end
      object F1: TMenuItem
        Caption = #25286#20998#36134#21333'(&F)'
        OnClick = F1Click
      end
      object N10: TMenuItem
        Caption = '-'
      end
      object G1: TMenuItem
        Caption = #24050#25346#36134#21333#32467#36134'(&G)'
        OnClick = G1Click
      end
    end
    object N3: TMenuItem
      Caption = #31995#32479#32500#25252'(&W)'
      object N11: TMenuItem
        Caption = #20462#25913#24403#21069#25805#20316#21592#23494#30721'(&G)'
        OnClick = N11Click
      end
      object X1: TMenuItem
        Caption = #31995#32479#35774#32622'(&X)'
        OnClick = btn11Click
        object N7: TMenuItem
          Caption = #25163#29260#20449#24687#35774#32622
          OnClick = N7Click
        end
        object N20: TMenuItem
          Caption = #21830#21697#20449#24687#35774#32622
          OnClick = N20Click
        end
        object N21: TMenuItem
          Caption = #20250#21592#20449#24687#35774#32622
          OnClick = N21Click
        end
        object N22: TMenuItem
          Caption = #25805#20316#21592#20449#24687#35774#32622
          OnClick = N22Click

⌨️ 快捷键说明

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