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