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