Source position: graphics.pp line 1816
function ReadXPMFromStream(
Stream: TStream;
Size: Integer
):PPChar;