mainunit.dfm

来自「东华休闲山庄洗浴、餐饮、客房管理系统」· DFM 代码 · 共 1,575 行 · 第 1/5 页

      Left = 220
      Top = 0
      Caption = #39044#35746#31649#29702
      ImageIndex = 4
      OnClick = btn5Click
    end
    object btn6: TToolButton
      Left = 275
      Top = 0
      Caption = #33829#19994#26597#35810
      ImageIndex = 5
      OnClick = btn6Click
    end
    object btn7: TToolButton
      Left = 330
      Top = 0
      Caption = #36951#30041#29289#21697
      ImageIndex = 6
      OnClick = btn7Click
    end
    object btn8: TToolButton
      Left = 385
      Top = 0
      Caption = #21830#21697#31649#29702
      ImageIndex = 7
      Visible = False
    end
    object btn9: TToolButton
      Left = 440
      Top = 0
      Caption = #36130#21153#31649#29702
      ImageIndex = 8
      Visible = False
    end
    object btn10: TToolButton
      Left = 495
      Top = 0
      Caption = #20132#29677#31649#29702
      ImageIndex = 9
      Visible = False
    end
    object btn11: TToolButton
      Left = 550
      Top = 0
      Caption = #31995#32479#35774#32622
      ImageIndex = 10
      OnClick = btn11Click
    end
  end
  object stsbr1: TsuiStatusBar
    Left = 0
    Top = 683
    Width = 1024
    Height = 19
    UIStyle = DeepBlue
    PanelColor = 15263976
    Color = 15263976
    Panels = <
      item
        Alignment = taCenter
        Text = #19996#21326#20241#38386#23665#24196#23458#25151#31649#29702#31995#32479
        Width = 195
      end
      item
        Width = 50
      end>
  end
  object pnl1: TPanel
    Left = 241
    Top = 68
    Width = 783
    Height = 615
    Align = alClient
    Caption = 'pnl1'
    TabOrder = 3
    object spl1: TSplitter
      Left = 1
      Top = 478
      Width = 781
      Height = 2
      Cursor = crVSplit
      Align = alBottom
    end
    object suiPanel1: TsuiPanel
      Left = 1
      Top = 480
      Width = 781
      Height = 134
      UIStyle = MacOS
      BorderColor = 8355711
      ShowButton = True
      CaptionFontColor = clBlack
      Align = alBottom
      TabOrder = 0
      Color = clWhite
      object dbgrd1: TDBGrid
        Left = 4
        Top = 25
        Width = 773
        Height = 105
        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 = 477
      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
        000000000330303404000000FFFFFFFFFFFFFFFF000000000000000003303035
        05000000FFFFFFFFFFFFFFFF00000000000000000330303606000000FFFFFFFF
        FFFFFFFF00000000000000000330303707000000FFFFFFFFFFFFFFFF00000000
        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 = #25955#23458#24320#21333'(&G)'
        OnClick = btn1Click
      end