``` //用于获取 GameLib.ThrowItem 和 GameLib.ThrowItemEx 丢出在地上的物品对象。 unit Q46; interface uses Classes, SysUtils; procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); implementation procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); var ItemList :TList; I : Integer; Item : TUserItem; begin Gamelib.ThrowItem('3', '乌木剑', 300, 300, 3, 1, Player); //在地图300x300的3格坐标范围内爆出一把乌木剑,当前的Player可拾取 ItemList := GameLib.GetLastThrowItemList; for i := 0 to ItemList.Count - 1 do begin Item := TUserItem(ItemList[i]); //对Item 进行操作。 end end; end. ```