anchor.diff:  constructor TDocumentConverter.Create;
   begin
     ConsoleLog := TConsoleLog.Create();
  +  FVersionString := '0.1';
   end;
   
   destructor TDocumentConverter.Destroy;
  
positive.code:     Property OutputFile : String read FOutputFile write SetOutputFile;
      Property OutputFileFormat : Integer read FOutputFileFormat write SetOutputFileFormat;
      Property OutputFileFormatString : String read FOutputFileFormatString write SetOutputFileFormatString;
    end;
  
    function IsNumber(Str: String) : Boolean;
  
negative.code:     FInputFile: String;
      FOutputLogFile: String;
      ConsoleLog : TConsoleLog;
      FVersionString: String;
      procedure SetInputFile(const Value: String);
      procedure SetOutputFile(const Value: String);
      procedure SetOutputFileFormat(const Value: Integer);
      procedure SetOutputFileFormatString(const Value: String);
      procedure SetOutputLog(const Value: Boolean);
      procedure SetOutputLogFile(const Value: String);
      function IsValidFormat(FormatID : Integer): Boolean;
    public
  
      Constructor Create();
  