editormainformu.dfm

jvcl driver development envionment

    BoundLines = [blTop]
    Options = [sbFlatBtns]
    BtnOffsetHorz = 4
    BtnOffsetVert = 5
    BtnWidth = 24
    BtnHeight = 23
    Images = ToolbarImages
    BevelOuter = bvNone
    BevelWidth = 0
    TabOrder = 1
    InternalVer = 1
    object FontName: TJvFontComboBox
      Left = 3
      Top = 7
      Width = 175
      Height = 22
      DroppedDownWidth = 175
      FontName = 'Arial'
      Device = fdBoth
      ItemIndex = 0
      Options = [foWysiWyg]
      Sorted = True
      TabOrder = 0
      OnChange = FontNameChange
    end
    object FontSize: TJvSpinEdit
      Left = 182
      Top = 6
      Width = 42
      Height = 21
      Alignment = taRightJustify
      ButtonKind = bkStandard
      Decimal = 0
      MaxValue = 2147483647
      MinValue = 1
      Value = 8
      TabOrder = 1
      OnChange = FontSizeChange
    end
    object SpeedbarSection3: TJvSpeedBarSection
      Caption = 'Format'
    end
    object BoldBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Bold'
      GroupIndex = 5
      Hint = 'Bold'
      ImageIndex = 13
      Spacing = 1
      Left = 228
      Top = 5
      Visible = True
      OnClick = BoldButtonClick
      SectionName = 'Format'
    end
    object ItalicBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Italic'
      GroupIndex = 6
      Hint = 'Italic'
      ImageIndex = 14
      Spacing = 1
      Left = 252
      Top = 5
      Visible = True
      OnClick = ItalicButtonClick
      SectionName = 'Format'
    end
    object UnderlineBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Underline'
      GroupIndex = 7
      Hint = 'Underline'
      ImageIndex = 15
      Spacing = 1
      Left = 276
      Top = 5
      Visible = True
      OnClick = UnderlineButtonClick
      SectionName = 'Format'
    end
    object ColorBtn: TJvSpeedItem
      Caption = 'Color'
      DropDownMenu = ColorMenu
      Hint = 'Color|Formats the selection with a color'
      ImageIndex = 16
      MarkDropDown = False
      Spacing = 1
      Left = 300
      Top = 5
      Visible = True
      SectionName = 'Format'
    end
    object BackgroundBtn: TJvSpeedItem
      Caption = 'Background'
      DropDownMenu = BackgroundMenu
      Hint = 'Background|'
      ImageIndex = 24
      MarkDropDown = False
      Spacing = 1
      Left = 324
      Top = 5
      Visible = True
      SectionName = 'Format'
    end
    object LeftBtn: TJvSpeedItem
      Caption = 'Align Left'
      GroupIndex = 2
      Hint = 'Align Left'
      ImageIndex = 17
      Spacing = 1
      Left = 356
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object CenterBtn: TJvSpeedItem
      Tag = 2
      Caption = 'Center'
      GroupIndex = 2
      Hint = 'Center'
      ImageIndex = 18
      Spacing = 1
      Left = 380
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object RightBtn: TJvSpeedItem
      Tag = 1
      Caption = 'Align Right'
      GroupIndex = 2
      Hint = 'Align Right'
      ImageIndex = 19
      Spacing = 1
      Left = 404
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object JustifyBtn: TJvSpeedItem
      Tag = 3
      Caption = 'Justify'
      GroupIndex = 2
      Hint = 'Justify'
      ImageIndex = 23
      Spacing = 1
      Left = 428
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object SuperscriptBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Superscript'
      GroupIndex = 3
      Hint = 'Superscript'
      ImageIndex = 21
      Spacing = 1
      Left = 492
      Top = 5
      Visible = True
      OnClick = SubscriptClick
      SectionName = 'Format'
    end
    object SubscriptBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Subscript'
      GroupIndex = 3
      Hint = 'Subscript'
      ImageIndex = 22
      Spacing = 1
      Left = 516
      Top = 5
      Visible = True
      OnClick = SubscriptClick
      SectionName = 'Format'
    end
    object BulletsBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Bullets'
      GroupIndex = 4
      Hint = 'Bullets|Enter bullet mode'
      ImageIndex = 20
      Spacing = 1
      Left = 460
      Top = 5
      Visible = True
      OnClick = BulletsButtonClick
      SectionName = 'Format'
    end
  end
  object MainMenu: TJvMainMenu
    Images = ToolbarImages
    Style = msXP
    ImageMargin.Left = 0
    ImageMargin.Top = 0
    ImageMargin.Right = 0
    ImageMargin.Bottom = 0
    ImageSize.Height = 0
    ImageSize.Width = 0

    OnGetImageIndex = MainMenuGetImageIndex
    Left = 8
    Top = 128
    object FileMenu: TMenuItem
      Tag = -1
      Caption = '&File'
      object FileNewItem: TMenuItem
        Caption = '&New'
        Hint = 'Create a new file'
        ShortCut = 16462
        OnClick = FileNew
      end
      object FileOpenItem: TMenuItem
        Tag = 1
        Caption = '&Open...'
        Hint = 'Open an existing file'
        ShortCut = 16463
        OnClick = FileOpen
      end
      object FileSaveItem: TMenuItem
        Tag = 2
        Caption = '&Save'
        Hint = 'Save current file'
        ShortCut = 16467
        OnClick = FileSave
      end
      object FileSaveAsItem: TMenuItem
        Tag = -1
        Caption = 'Save &As...'
        Hint = 'Save current file under a new name'
        OnClick = FileSaveAs
      end
      object FileSaveSelItem: TMenuItem
        Tag = -1
        Caption = 'Save Selec&ted...'
        OnClick = FileSaveSelected
      end
      object N1: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object FilePrintItem: TMenuItem
        Tag = 3
        Caption = '&Print'
        Hint = 'Print current file'
        ShortCut = 16464
        OnClick = FilePrint
      end
      object N4: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object FileExitItem: TMenuItem
        Tag = -1
        Caption = 'E&xit'
        Hint = 'Exit this application'
        ShortCut = 32856
        OnClick = FileExit
      end
    end
    object EditMenu: TMenuItem
      Tag = -1
      Caption = '&Edit'
      GroupIndex = 1
      object EditUndoItem: TMenuItem
        Tag = 9
        Caption = '&Undo'
        Hint = 'Undo the last action'
        ShortCut = 16474
        OnClick = EditUndo
      end
      object EditRedoItem: TMenuItem
        Tag = 10
        Caption = '&Redo'
        Hint = 'Redo the last action'
        ShortCut = 16473
        OnClick = EditRedo
      end
      object N2: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object EditCutItem: TMenuItem
        Tag = 6
        Caption = 'Cu&t'