dockingmegademo.dfm

胜天进销存源码,国产优秀的进销存

object fmMain: TfmMain
  Left = 80
  Top = 50
  Width = 837
  Height = 641
  Caption = 'DockingMega Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object alMain: TActionList
    Images = imBarIcons
    Left = 192
    Top = 104
    object actHelp: TAction
      Category = 'Help'
      Caption = 'ExpressBars 6 &Help'
      Hint = 'Starts the ExpressBars6 help system'
      ImageIndex = 36
    end
    object actRateDemo: TAction
      Category = 'Help'
      Caption = '&Rate this demo...'
      Hint = 'Send feedback to Developer Express'
      ImageIndex = 37
    end
    object actDownloads: TAction
      Category = 'Help'
      Caption = 'Developer Express &Downloads'
      Hint = 
        'Launches the web-page with the list of available downloads of De' +
        'veloper Express products'
      ImageIndex = 35
    end
    object actForum: TAction
      Category = 'Help'
      Caption = 'DevExpress Online Support &Forum'
      Hint = 'Launches the web-page with the Developer Express forum'
      ImageIndex = 35
    end
    object actDXOnTheWeb: TAction
      Category = 'Help'
      Caption = 'Developer Express on the &Web'
      Hint = 'Launches the official web-site of Developer Express'
      ImageIndex = 34
    end
    object actProducts: TAction
      Category = 'Help'
      Caption = 'Developer Express &Products'
      Hint = 
        'Launches the web-page with the list of Developer Express product' +
        's'
      ImageIndex = 35
    end
    object actAbout: TAction
      Category = 'Help'
      Caption = '&About this demo'
      Hint = 'Displays the brief description of the current demo features'
    end
    object actShowDemoDescription: TAction
      Category = 'Options'
      Caption = '&Show Demo Description'
      Checked = True
      Hint = 'Display the description of the current demo'
    end
  end
  object dxDockingManager1: TdxDockingManager
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Images = ilDockIcons
    Options = [doActivateAfterDocking, doDblClickDocking, doFloatingOnTop, doTabContainerHasCaption, doTabContainerCanAutoHide, doSideContainerHasCaption, doSideContainerCanClose, doSideContainerCanAutoHide, doTabContainerCanInSideContainer]
    ViewStyle = vsNET
    Left = 472
    Top = 8
  end
  object BarManager: TdxBarManager
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Bars = <
      item
        Caption = 'Main Menu'
        DockedDockingStyle = dsTop
        DockedLeft = 0
        DockedTop = 0
        DockingStyle = dsTop
        FloatLeft = 43
        FloatTop = 96
        FloatClientWidth = 132
        FloatClientHeight = 38
        IsMainMenu = True
        ItemLinks = <
          item
            Item = dxBarSubItemFile
            Visible = True
          end
          item
            Item = dxBarSubItemInsert
            Visible = True
          end
          item
            Item = dxBarSubItemFormat
            Visible = True
          end
          item
            Item = dxBarSubItemHelp
            Visible = True
          end>
        MultiLine = True
        OneOnRow = True
        Row = 0
        UseOwnFont = False
        Visible = True
        WholeRow = True
      end
      item
        Caption = 'File'
        DockedDockingStyle = dsTop
        DockedLeft = 0
        DockedTop = 23
        DockingStyle = dsTop
        FloatLeft = 404
        FloatTop = 341
        FloatClientWidth = 46
        FloatClientHeight = 22
        ItemLinks = <
          item
            Item = dxBarButtonLoad
            Visible = True
          end
          item
            Item = dxBarButtonSave
            Visible = True
          end>
        Name = 'File'
        OneOnRow = False
        Row = 1
        UseOwnFont = False
        Visible = True
        WholeRow = False
      end
      item
        Caption = 'Style'
        DockedDockingStyle = dsTop
        DockedLeft = 67
        DockedTop = 23
        DockingStyle = dsTop
        FloatLeft = 404
        FloatTop = 341
        FloatClientWidth = 46
        FloatClientHeight = 22
        ItemLinks = <
          item
            Item = dxBarButtonColor
            Visible = True
          end
          item
            Item = dxBarButtonFont
            Visible = True
          end>
        Name = 'Style'
        OneOnRow = False
        Row = 1
        UseOwnFont = False
        Visible = True
        WholeRow = False
      end
      item
        Caption = 'Help'
        DockedDockingStyle = dsTop
        DockedLeft = 134
        DockedTop = 23
        DockingStyle = dsTop
        FloatLeft = 404
        FloatTop = 341
        FloatClientWidth = 23
        FloatClientHeight = 22
        ItemLinks = <>
        Name = 'Help'
        OneOnRow = False
        Row = 1
        UseOwnFont = False
        Visible = True
        WholeRow = False
      end>
    Categories.Strings = (
      'File'
      'View'
      'Style'
      'Help'
      'Menus'
      'Popup')
    Categories.ItemsVisibles = (
      2
      2
      2
      2
      2
      2)
    Categories.Visibles = (
      True
      True
      True
      True
      True
      True)
    Images = imBarIcons
    PopupMenuLinks = <>
    StretchGlyphs = False
    Style = bmsFlat
    UseSystemFont = True
    Left = 502
    Top = 8
    DockControlHeights = (
      0
      0
      49
      0)
    object dxBarButtonLoad: TdxBarButton
      Caption = '&Load layout...'
      Category = 0
      Hint = 'Load layout|Opens an existing file'
      Visible = ivAlways
      ImageIndex = 1
    end
    object dxBarButtonSave: TdxBarButton
      Caption = '&Save layout...'
      Category = 0
      Hint = 'Save layout|Saves the active file with a new name'
      Visible = ivAlways
      ImageIndex = 2
    end
    object dxBarSubItemFile: TdxBarSubItem
      Caption = '&File'
      Category = 4
      Visible = ivAlways
      ItemLinks = <
        item
          Item = dxBarButtonLoad
          Visible = True
        end
        item
          Item = dxBarButtonSave
          Visible = True
        end
        item
          BeginGroup = True
          Item = dxBarButtonExit
          Visible = True