Source position: lresources.pp line 540
procedure LRSObjectResourceToText(
Input: TStream;
Output: TStream
);