anchor.diff:    ProgramLink: string;
     ProgramPath: string;
     ProgramFilename: string;
  +  lURL: string;
     ProgramInfo : TSerializableStringList;
     tmpProgramLinkParts : TStrings;
   
  
positive.code:          then
        begin
          OutputString := '<color blue><link ' + PARAM_LINK_URL + ' '
                          + FullDoubleQuote( ProgramLink )
                          + '>';
        end
        else
  
negative.code:       tmpProgramLinkParts := TStringList.Create;
        StrExtractStrings(tmpProgramLinkParts, ProgramLink, [' '], #0);
        ProgramPath := tmpProgramLinkParts[0];
        lURL := tmpProgramLinkParts[1];
        tmpProgramLinkParts.Destroy;
  
        ProgramFilename := ExtractFilename( ProgramPath );
  