TItemState
TItemState
属性名称
功能
DisableMake 禁止GM命令制造 WriteLog 记录日志 DropHint 掉落提示 ButchHint 挖取提示 NoPickUp 禁止拾取 BoxHint 宝箱提示 ShowNameClient 显示名称 客户端. SpecialShow 特殊显示 客户端 AutoPickUp 客户端自动拾取 NerverDrop 永不掉落 Bind 绑定 NoRepair 禁止修理 NoStore 禁止存仓 OfflineFree 下线消失 NoDrop 禁止丢弃 DeathFree 死亡消失 DeathDrop 死亡必爆 NoTakeOff 穿戴后不允许取下 AutoBindAfterTakeOn 穿戴后自动绑定 CallMethodOnMonDrop 怪物掉落后触发脚本 CallMethodOnPlayerDrop 玩家掉落后触发 CallMethodOnButch 挖取时 触发函数 CallMethodOnPickUp 拾取时触发函数
示例：
unit Q28;
interface
uses Classes, SysUtils, DateUtils;
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
implementation
procedure Main(Npc: TNormNPC; Player: TPlayObject; Args: TArgs);
begin
if Player.Wepon <> nil then
begin
Player.Wepon.state.Bind := True; //装备为绑定状态
Player.Wepon.MaxDate := DateUtils.IncDay(Now, 7); //武器的有效期为当前时间加7天
Player.Wepon.MakeHole; //打一个孔，如果已开3孔则无效
Player.UpdateItem(Player.Wepon); //任何装备的属性更新，最后都必须给客户端发送更新消息
end;
end;
end.
引擎官网：www.91M2.com 交流群：5555999 此引擎仅供测试，切勿用于商业用途。如有侵权请立即联系我们，我们将在第一时间删除。