anchor.diff:  end;
   
   procedure TMainForm.DisplaySelectedSearchResultTopic;
  -begin
  -  //
  +var
  +  Topic: TTopic;
  +begin
  +  if lbSearchResults.FocusItem = -1 then
  +    exit;
  +  if lbSearchResults.Items.Objects[lbSearchResults.FocusItem] = nil then
  +    // the "no results" place holder
  +    exit;
  +  Topic := lbSearchResults.Items.Objects[lbSearchResults.FocusItem] as TTopic;
  +  DisplayTopic( Topic );
   end;
   
   procedure TMainForm.EnableControls;
  
positive.code:   ProfileEvent('Debug show hex values = ' + BoolToStr(Debug));
    if ImageIndices <> nil then
      ProfileEvent('ImageIndices initialized');
    //Topic.GetText(HelpFile.HighlightWords,
    //              Debug,
    //              lText,
    //              ImageIndices);
    Topic.GetText( nil {HighlightWordSequences},
                    Debug {ShowCodes},
                    False {ShowWordIndices},
                    lText {TopicText},
  
negative.code: var
    showtopic: boolean;
  begin
    if ParamCount > 0 then
    begin
      if gCommandLineParams.IsParam('h') then
      begin
        ShowParamHelp;
        Exit;
      end
      else
      begin
        showtopic := not gCommandLineParams.IsParam('s');
  