|
@@ -1024,7 +1024,7 @@ begin
|
|
inherited Create;
|
|
inherited Create;
|
|
FDefaultEncoding:=TEncoding.Default;
|
|
FDefaultEncoding:=TEncoding.Default;
|
|
FEncoding:=nil;
|
|
FEncoding:=nil;
|
|
- FOptions := [soWriteBOM,soTrailingLineBreak,soUseLocale];
|
|
|
|
|
|
+ FOptions := [soTrailingLineBreak,soUseLocale,soPreserveBOM];
|
|
FAlwaysQuote:=False;
|
|
FAlwaysQuote:=False;
|
|
end;
|
|
end;
|
|
|
|
|