91M2引擎如何穿戴或取下一件装备，77M2引擎将武器取下来的方法

如何穿戴或取下一件装备
unit Q2;

inte**ce
  uses Classes, SysUtils;

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);

implementation

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var      
  AUserItem: TUserItem;
begin
  if Player.Wepon  nil then //如果装备了武器
    Player.TakeOffItem(wWeapon); //将武器取下来,wWeapon表示装备的位置
  AUserItem := Npc.GiveItem(Player, '乌木剑'); //给玩家制造一把乌木剑
  if AUserItem  nil then
    Player.TakeOnItem(AUserItem, wWeapon); //然后将乌木剑装备到武器位置上
end;

end.

注意：代码中调用TakeOffItem和TakeOnItem执行装备取下和穿上的时候，将不会触发QFunctionNpc中的OnTakeOffItem和OnTakeOnItem事件

楼猪V5啊

鼎力支持！！

高手云集 果断围观

佩服佩服！

路过

呵呵，低调，低调！

看起来不错，支持75kf论坛哟

高手云集 果断围观

路过