editormainformu.dfm

jvcl driver development envionment

object EditorMainForm: TEditorMainForm
  Left = 324
  Top = 105
  Width = 554
  Height = 282
  ActiveControl = FontName
  Caption = 'Rich Edit 2.0 Demo'
  Color = clBtnFace
  Constraints.MinHeight = 280
  Constraints.MinWidth = 550
  DefaultMonitor = dmDesktop
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu
  OldCreateOrder = True
  Position = poDesktopCenter
  Scaled = False
  OnActivate = FormActivate
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnPaint = FormPaint
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Ruler: TPanel
    Left = 0
    Top = 62
    Width = 546
    Height = 26
    Align = alTop
    Alignment = taLeftJustify
    BevelInner = bvLowered
    BevelOuter = bvNone
    BorderWidth = 1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnResize = RulerResize
    object FirstInd: TLabel
      Left = 3
      Top = 2
      Width = 10
      Height = 12
      Caption = #234
      DragCursor = crArrow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Wingdings'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnMouseDown = RulerItemMouseDown
      OnMouseMove = RulerItemMouseMove
      OnMouseUp = FirstIndMouseUp
    end
    object LeftInd: TLabel
      Left = 3
      Top = 12
      Width = 10
      Height = 12
      Caption = #233
      DragCursor = crArrow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Wingdings'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnMouseDown = RulerItemMouseDown
      OnMouseMove = RulerItemMouseMove
      OnMouseUp = LeftIndMouseUp
    end
    object RulerLine: TBevel
      Left = 4
      Top = 12
      Width = 482
      Height = 2
      Shape = bsTopLine
    end
    object RightInd: TLabel
      Left = 475
      Top = 13
      Width = 9
      Height = 12
      Caption = #241
      DragCursor = crArrow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Wingdings'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnMouseDown = RulerItemMouseDown
      OnMouseMove = RulerItemMouseMove
      OnMouseUp = RightIndMouseUp
    end
  end
  object Editor: TJvRichEdit
    Left = 0
    Top = 88
    Width = 546
    Height = 129
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    HideSelection = False
    ParentFont = False
    PopupMenu = EditPopupMenu
    TabOrder = 3
    WantTabs = True
    Zoom = 100
    OnChange = RichEditChange
    OnProtectChange = EditorProtectChange
    OnSelectionChange = SelectionChange
    OnTextNotFound = EditorTextNotFound
    OnURLClick = EditorURLClick
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 217
    Width = 546
    Height = 19
    Panels = <
      item
        Width = 120
      end
      item
        Alignment = taCenter
        Width = 60
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object SpeedBar: TJvSpeedBar
    Left = 0
    Top = 0
    Width = 546
    Height = 31
    ParentFont = True
    BoundLines = [blTop]
    Options = [sbFlatBtns]
    BtnOffsetHorz = 4
    BtnOffsetVert = 5
    BtnWidth = 24
    BtnHeight = 23
    Images = ToolbarImages
    BevelOuter = bvNone
    Locked = True
    TabOrder = 0
    InternalVer = 1
    object SpeedbarSection1: TJvSpeedBarSection
      Caption = 'File'
    end
    object SpeedbarSection2: TJvSpeedBarSection
      Caption = 'Edit'
    end
    object NewBtn: TJvSpeedItem
      Caption = 'New'
      Hint = 'New|'
      ImageIndex = 0
      Spacing = 1
      Left = 4
      Top = 5
      Visible = True
      OnClick = FileNew
      SectionName = 'File'
    end
    object OpenBtn: TJvSpeedItem
      Caption = 'Open'
      Hint = 'Open|'
      ImageIndex = 1
      Spacing = 1
      Left = 28
      Top = 5
      Visible = True
      OnClick = FileOpen
      SectionName = 'File'
    end
    object SaveBtn: TJvSpeedItem
      Caption = 'Save'
      Hint = 'Save|'
      ImageIndex = 2
      Spacing = 1
      Left = 52
      Top = 5
      Visible = True
      OnClick = FileSave
      SectionName = 'File'
    end
    object PrintBtn: TJvSpeedItem
      Caption = 'Print'
      Hint = 'Print|'
      ImageIndex = 3
      Spacing = 1
      Left = 76
      Top = 5
      Visible = True
      OnClick = FilePrint
      SectionName = 'File'
    end
    object CutBtn: TJvSpeedItem
      Caption = 'Cut'
      Hint = 'Cut|'
      ImageIndex = 6
      Spacing = 1
      Left = 140
      Top = 5
      Visible = True
      OnClick = EditCut
      SectionName = 'Edit'
    end
    object CopyBtn: TJvSpeedItem
      Caption = 'Copy'
      Hint = 'Copy|'
      ImageIndex = 7
      Spacing = 1
      Left = 164
      Top = 5
      Visible = True
      OnClick = EditCopy
      SectionName = 'Edit'
    end
    object PasteBtn: TJvSpeedItem
      Caption = 'Paste'
      Hint = 'Paste|'
      ImageIndex = 8
      Spacing = 1
      Left = 188
      Top = 5
      Visible = True
      OnClick = EditPaste
      SectionName = 'Edit'
    end
    object UndoBtn: TJvSpeedItem
      Caption = 'Undo'
      Hint = 'Undo|'
      ImageIndex = 9
      Spacing = 1
      Left = 220
      Top = 5
      Visible = True
      OnClick = EditUndo
      SectionName = 'Edit'
    end
    object RedoBtn: TJvSpeedItem
      Caption = 'Redo'
      Hint = 'Redo|'
      ImageIndex = 10
      Spacing = 1
      Left = 244
      Top = 5
      Visible = True
      OnClick = EditRedo
      SectionName = 'Edit'
    end
    object FindBtn: TJvSpeedItem
      Caption = 'Find'
      Hint = 'Find|'
      ImageIndex = 5
      Spacing = 1
      Left = 108
      Top = 5
      Visible = True
      OnClick = EditFindClick
      SectionName = 'Edit'
    end
  end
  object FormatBar: TJvSpeedBar
    Left = 0
    Top = 31
    Width = 546
    Height = 31
    ParentFont = True