Source position: agraphics.pas line 2199
function AllocSpriteDataA(
Bitmap: PBitMap;
TagList: PTagItem
):PExtSprite;