4
Program to demonstrate the TStream.ReadStr TStream.WriteStr functions
14
L:='Constant string line';
15
Writeln ('Writing to stream : "',L,'"');
16
S:=New(PMemoryStream,Init(100,10));
23
Writeln ('Read from stream : "',L,'"');
b'\\ No newline at end of file'