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:     try
      Wordapp :=  CreateOleObject('Word.Application');
      Wordapp.Visible := false;
      Wordapp.documents.Open(InputFile);
      Wordapp.activedocument.Saveas(OutputFile ,OutputFileFormat);
      Wordapp.activedocument.Close;
      wordapp.quit();
  
negative.code: constructor TDocumentConverter.Create;
  begin
    ConsoleLog := TConsoleLog.Create();
    FVersionString := '0.1';
  end;
  
  destructor TDocumentConverter.Destroy;
  