TStringStream.Write cuts data
Original Reporter info from Mantis: DayGaik
-
Reporter name: Dmitriy
Original Reporter info from Mantis: DayGaik
- Reporter name: Dmitriy
Description:
TStringStream.Write cuts data when Position < Size.
Steps to reproduce:
var
S: TStringStream;
Buffer: Char;
begin
S := TStringStream.Create('ABCD');
Buffer := 'X';
S.Position := 0;
S.WriteBuffer(Buffer, SizeOf(Buffer));
Writeln(S.DataString); // Writes 'X', but expected 'XBCD'.
end;
Mantis conversion info:
- Mantis ID: 24130
- Version: 2.6.0
- Fixed in version: 3.0.0
- Fixed in revision: 26715 (#f163a352)
- Target version: 3.0.0