wwricheditbar.dfm

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

object wwRichBarFrame: TwwRichBarFrame
  Left = 0
  Top = 0
  Width = 797
  Height = 582
  TabOrder = 0
  object RichEditBar: TPanel
    Left = 0
    Top = 0
    Width = 692
    Height = 366
    Margins.Left = 0
    ParentBackground = False
    ParentColor = True
    TabOrder = 0
    OnEnter = RichEditBarEnter
    DesignSize = (
      692
      366)
    object FormatBarBevel: TBevel
      Left = 0
      Top = 30
      Width = 690
      Height = 2
      Anchors = [akLeft, akTop, akRight]
      Shape = bsTopLine
      ExplicitWidth = 641
    end
    object RulerBevel: TBevel
      Left = 0
      Top = 57
      Width = 690
      Height = 2
      Anchors = [akLeft, akTop, akRight]
      Shape = bsTopLine
      ExplicitWidth = 699
    end
    object FormatBar: TToolBar
      AlignWithMargins = True
      Left = 5
      Top = 34
      Width = 564
      Height = 23
      Align = alNone
      Caption = 'FormatBar'
      Images = RichEditButtonIcons
      TabOrder = 1
      TabStop = True
      Wrapable = False
      object FontNameCombo: TwwDBComboBox
        Left = 0
        Top = 0
        Width = 200
        Height = 22
        ShowButton = True
        Style = csDropDownList
        MapList = False
        AllowClearKey = False
        DropDownCount = 20
        HistoryList.FileName = 'delphi32.ini.ini'
        ItemHeight = 0
        LimitEditRect = True
        ParentShowHint = False
        ShowHint = False
        Sorted = True
        TabOrder = 0
        UnboundDataType = wwDefault
        OnCloseUp = FontNameComboCloseUp
      end
      object FontSizeCombo: TwwDBComboBox
        Left = 200
        Top = 0
        Width = 45
        Height = 22
        ShowButton = True
        Style = csDropDown
        MapList = False
        AllowClearKey = False
        DropDownCount = 8
        HistoryList.FileName = 'delphi32.ini.ini'
        ItemHeight = 0
        Items.Strings = (
          '8'
          '9'
          '10'
          '11'
          '12'
          '14'
          '16'
          '18'
          '20'
          '22'
          '24'
          '26'
          '28'
          '36'
          '48'
          '72')
        LimitEditRect = True
        ParentShowHint = False
        ShowHint = False
        Sorted = False
        TabOrder = 1
        UnboundDataType = wwDefault
        OnCloseUp = FontSizeComboCloseUp
      end
      object BoldButton: TToolButton
        Left = 245
        Top = 0
        AllowAllUp = True
        ImageIndex = 0
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = BoldButtonClick
        OnMouseDown = BoldButtonMouseDown
      end
      object ItalicButton: TToolButton
        Left = 268
        Top = 0
        AllowAllUp = True
        ImageIndex = 4
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = ItalicButtonClick
        OnMouseDown = BoldButtonMouseDown
      end
      object UnderlineButton: TToolButton
        Left = 291
        Top = 0
        AllowAllUp = True
        ImageIndex = 8
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = UnderlineButtonClick
        OnMouseDown = BoldButtonMouseDown
      end
      object ColorButton: TToolButton
        Left = 314
        Top = 0
        AllowAllUp = True
        ImageIndex = 24
        ParentShowHint = False
        ShowHint = False
        OnClick = ColorButtonClick
        OnMouseDown = BoldButtonMouseDown
      end
      object ToolButton3: TToolButton
        Left = 337
        Top = 0
        Width = 8
        Caption = 'ToolButton3'
        ImageIndex = 0
        Style = tbsSeparator
      end
      object LeftButton: TToolButton
        Left = 345
        Top = 0
        Grouped = True
        ImageIndex = 5
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = LeftButtonClick
      end
      object CenterButton: TToolButton
        Left = 368
        Top = 0
        Grouped = True
        ImageIndex = 2
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = CenterButtonClick
      end
      object RightButton: TToolButton
        Left = 391
        Top = 0
        Grouped = True
        ImageIndex = 6
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = RightButtonClick
      end
      object JustifyButton: TToolButton
        Left = 414
        Top = 0
        Grouped = True
        ImageIndex = 25
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = JustifyButtonClick
      end
      object ToolButton1: TToolButton
        Left = 437
        Top = 0
        Width = 8
        Caption = 'ToolButton1'
        ImageIndex = 0
        Style = tbsSeparator
      end
      object BulletButton: TToolButton
        Left = 445
        Top = 0
        AllowAllUp = True
        ImageIndex = 1
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = BulletButtonClick
        OnMouseDown = BoldButtonMouseDown
      end
      object HighlightButton: TToolButton
        Left = 468
        Top = 0
        AllowAllUp = True
        ImageIndex = 26
        ParentShowHint = False
        ShowHint = False
        Style = tbsCheck
        OnClick = HighlightButtonClick
      end
    end
    object Toolbar: TToolBar
      Left = 3
      Top = 4
      Width = 566
      Height = 24
      Align = alNone
      Color = clBtnFace