Source position: lresources.pp line 454
procedure FormDataToText(
FormStream: TStream;
TextStream: TStream
);