anchor.diff:    FOwnedFileStream:= nil;
     FExtStream:= nil;
     FUTF8:= true;
  +  FUTF8BOM := true;
     StartNewRow;
   end;
   
  
positive.code: 
    if Assigned(FExtStream) then
    begin
      if FUTF8 then
        AddUTF8BOMToStream(FExtStream);
    end
    else
  
negative.code:     property LineEnding: String read FLineEnding write FLineEnding;
      property FileName: String read FFilename write FFilename;
      property UTF8: Boolean read FUTF8 write FUTF8;
      property UTF8BOM : Boolean read FUTF8BOM write FUTF8BOM;
      property Stream : TStream read FExtStream write FExtStream;
    end;
  
  