Source position: graphics.pp line 2015
function TestStreamIsCursor(
const AStream: TStream
):Boolean;