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