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