anchor.diff:  
   
   
  +function TDocumentConverter.IsValidFormat(FormatID: Integer): Boolean;
  +var
  +  i : integer;
  +begin
  +  Result := false;
  +  for i := 0 to Formats.Count -1 do
  +  begin
  +    if Formats.ValueFromIndex[i] = inttostr(FormatID) then
  +    begin
  +      Result := true;
  +      break;
  +    end;
  +  end;
  +end;
  +
   procedure TDocumentConverter.LoadConfig(Params: TStrings);
   var i, f , iParam, idx: integer;
   pstr : string;
  
positive.code:       log('  -T Format to convert file to, either integer or wdSaveFormat constant. ');
        log('     Available from http://msdn.microsoft.com/en-us/library/microsoft.office.interop.word.wdsaveformat.aspx ');
        log('     See current List Below. ');
        log('  -L Log to file in directory');
        log(' ');
        log('FILE FORMATS');
  
negative.code:       FInputFile := value;
        log('Input File is : ' + FInputFile);
      end
      else if (id = '-T') or (id = '-TF') then
      begin
  
        if IsNumber(value) then
        begin
          FOutputFileFormat :=  strtoint(value);
          if (id = '-TF') and ( not IsValidFormat(FOutputFileFormat)) then
          begin
            Log('File Format ' + OutputFileFormatString + ' is invalid, please see help. -h');
            halt(200);
          end;
        end
        else
        begin
  