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