object CodePageForm: TCodePageForm
  Left = 12
  Top = 11
  Width = 541
  Height = 427
  Caption = 'Source Code Page'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  PopupMenu = PopupMenu1
  PixelsPerInch = 96
  TextHeight = 13
  object CodePage: TRichEdit
    Left = 0
    Top = 0
    Width = 533
    Height = 400
    Cursor = crIBeam
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clTeal
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    HideSelection = False
    HideScrollBars = False
    Lines.Strings = (
      '')
    ParentFont = False
    PlainText = True
    ScrollBars = ssVertical
    TabOrder = 0
    Visible = False
    WordWrap = False
  end
  object SourceRichEdit1: TRichEdit
    Left = 0
    Top = 0
    Width = 533
    Height = 400
    Align = alClient
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    HideScrollBars = False
    Lines.Strings = (
      '')
    ParentFont = False
    PlainText = True
    ScrollBars = ssVertical
    TabOrder = 1
    Visible = False
  end
  object PopupMenu1: TPopupMenu
    Left = 136
    Top = 40
    object FindText1: TMenuItem
      Caption = 'Search for Text'
      ShortCut = 16467
      OnClick = FindText1Click
    end
    object Exit1: TMenuItem
      Caption = 'Exit'
      ShortCut = 16453
      OnClick = Exit1Click
    end
  end
  object FindDialog1: TFindDialog
    OnFind = FindDialog1Find
    Left = 184
    Top = 36
  end
end