anchor.diff:      Name := 'cbEncoding';
       SetPosition(524, 2, 124, 22);
       Anchors := [anRight,anTop];
  +    ExtraHint := '';
       FontDesc := '#List';
       Hint := '';
       Items.Add('UTF-8');
       Items.Add('CP437');
       Items.Add('CP850');
       Items.Add('IBM Graph (cp437)');
  +    FocusItem := 0;
       TabOrder := 10;
  -    FocusItem := 0;
       OnChange  := @cbEncodingChanged;
     end;
   
  
positive.code:   with Splitter1 do
    begin
      Name := 'Splitter1';
      SetPosition(265, 120, 8, 168);
      Align := alLeft;
      OnDoubleClick :=@Splitter1DoubleClicked;
    end;
  
    RichView := TRichTextView.Create(bvlBody);
    with RichView do
    begin
      Name := 'RichView';
      SetPosition(368, 192, 244, 92);
      TabOrder := 2;
      Align := alClient;
      OnOverLink  := @RichViewOverLink;
  
negative.code:     sep := ' > ';
    end;
    SetStatus(s);
    UpdateTitlePanel;
  end;
  
  procedure TMainForm.UpdateTitlePanel;
  begin
    pnlTitle.Text := CurrentTopic.Title;
  end;
  
  procedure TMainForm.EnableControls;
  