object EditForm: TEditForm
  Left = 1
  Top = 89
  Width = 639
  Height = 300
  Caption = 'Editor'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Menu = MainMenu1
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object EditBox: TMemo
    Left = 46
    Top = 152
    Width = 185
    Height = 89
    HelpContext = 685
    ScrollBars = ssBoth
    TabOrder = 0
    WordWrap = False
    OnKeyDown = EditBoxKeyDown
  end
  object OKbtn: TButton
    Left = 556
    Top = 4
    Width = 69
    Height = 27
    Caption = 'OK'
    TabOrder = 1
    OnClick = OKbtnClick
  end
  object CancelBtn: TButton
    Left = 484
    Top = 4
    Width = 67
    Height = 27
    Cancel = True
    Caption = 'Cancel'
    TabOrder = 2
    OnClick = OKbtnClick
  end
  object SaveDialog1: TSaveDialog
    FileEditStyle = fsEdit
    Options = [ofHideReadOnly, ofNoChangeDir, ofCreatePrompt]
    Left = 48
    Top = 8
  end
  object MainMenu1: TMainMenu
    Left = 78
    Top = 10
    object EditorFile: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object FileSave: TMenuItem
        Caption = '&Save'
        ShortCut = 0
        OnClick = OKbtnClick
      end
      object FileExit: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = OKbtnClick
      end
    end
    object EditorEdit: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object EditCut: TMenuItem
        Caption = 'Cu&t'
        ShortCut = 0
        OnClick = EditCutClick
      end
      object EditCopy: TMenuItem
        Caption = '&Copy'
        ShortCut = 0
        OnClick = EditCopyClick
      end
      object EditPaste: TMenuItem
        Caption = '&Paste'
        ShortCut = 0
        OnClick = EditPasteClick
      end
    end
    object EditorHelp: TMenuItem
      Caption = '&Help'
      HelpContext = 680
      ShortCut = 0
      OnClick = EditorHelpClick
      object Editor: TMenuItem
        ShortCut = 0
      end
    end
  end
end