|
如何增加一个扩展按钮
procedure PlayerOnLogin(Npc: TNormNpc; Player: TPlayObject); //该函数定义位于“系统固定NPC\ManagerNpc”中,角色登陆将触发该函数
begin
Player.AddExtendButton('邮件系统', '邮件系统', '@ExtendButtonMail', 0); //增加一个充值按钮在客户端界面顶部小地图旁边
Player.AddTopExtendButton('攻城车', '攻城车租用', '@ExtendButtonXX', 3); //增加一个充值按钮在客户端界面底部操作区
end;
增加一个扩展按钮到客户端,AddExtendButton函数增加的位于药品栏下方,AddTopExtendButton函数增加的位于小地图左侧
按钮指向的函数位于ManagerNpc单元中,声明格式为(同常见的入口函数): procedure FuncName(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
如何删除一个扩展按钮
unit Q2;
inte**ce
uses Classes, SysUtils;
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
implementation
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
begin
Player.RemoveExtendButton('邮件系统'); //删除一个名为“邮件系统”的按钮
//注意:删除时是顶部和底部的按钮都会处理,所以在增加的时候就不应该让按钮同名
end;
end.
|
|