91M2引擎删除和增加扩展按钮的制作详细说明

" X; w% m* u4 z' y" s% i6 U

) y0 C; O9 P+ W如何增加一个扩展按钮

, |% n) m7 i! [6 d7 ?
procedure PlayerOnLogin(Npc: TNormNpc; Player: TPlayObject);  //该函数定义位于“系统固定NPC\ManagerNpc”中，角色登陆将触发该函数
begin
  Player.AddExtendButton('邮件系统', '邮件系统', '@ExtendButtonMail', 0); //增加一个充值按钮在客户端界面顶部小地图旁边
  Player.AddTopExtendButton('攻城车', '攻城车租用', '@ExtendButtonXX', 3); //增加一个充值按钮在客户端界面底部操作区
3 w5 P5 N# m+ E5 {1 @" }end;

/ T4 a6 W8 Q9 |1 ]


/ ]% a" V, x- y' \增加一个扩展按钮到客户端，AddExtendButton函数增加的位于药品栏下方，AddTopExtendButton函数增加的位于小地图左侧
按钮指向的函数位于ManagerNpc单元中，声明格式为（同常见的入口函数）： procedure FuncName(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
8 X6 a- @2 f, O1 I# R! v  l+ J' A" E! h
; S3 J! O6 x8 [3 Q  k! [
% A! K% j) H2 i( n$ H2 {/ e! M如何删除一个扩展按钮
! U( H1 {) Z: F# r0 {- X% u
" Y1 g$ D/ @( b. y" ~3 F9 s3 L, H
unit Q2;
; O8 h( P3 @4 J$ T$ a! b9 o

inte**ce
  uses Classes, SysUtils;
  Z+ G5 |9 f4 L% F: b  V
0 z9 M; m& e2 J* a0 _
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
, v' L5 j. m1 t0 y" w* B9 h, ^
+ d# k* Y) @; ^3 E2 K, u
( j% x2 V0 a* i+ a# ^& y  simplementation
, F1 x' C/ P" Y+ [& H. V5 X, g

3 U0 L1 ]& U/ k; Q4 j0 bprocedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
begin   
  Player.RemoveExtendButton('邮件系统'); //删除一个名为“邮件系统”的按钮
' J. y( f. j  z  //注意:删除时是顶部和底部的按钮都会处理,所以在增加的时候就不应该让按钮同名
! c  V9 q5 N" M' K$ ~end;

& F1 N! P) M9 n" D' S
9 s2 F) Y3 i" o  C7 \end.
" V8 n2 M9 v# T: S