Source position: lresources.pp line 501
function TestFormStreamFormat(
Stream: TStream
):TLRSStreamOriginalFormat;