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