Skip to content

Commit 08d0817

Browse files
committed
fix: Correção de erro de compilação em RALStorageCSV.pas
1 parent 26c2541 commit 08d0817

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/utils/RALStorageCSV.pas

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -231,7 +231,7 @@ procedure TRALStorageCSV.SaveToStream(ADataset: TDataSet; AStream: TStream);
231231
UTF8BOM = #$EF#$BB#$BF;
232232
begin
233233
if FUseUTF8BOM then
234-
AStream.Write(UTF8BOM, Length(UTF8BOM));
234+
AStream.Write(BytesOf(UTF8BOM), Length(UTF8BOM));
235235
WriteFields(ADataset, AStream);
236236
WriteRecords(ADataset, AStream);
237237
end;

0 commit comments

Comments
 (0)