77M2引擎中如何实现一个带参数的输入框 91M2引擎添加输入框教程

admin

77M2引擎中如何实现一个带参数的输入框 91M2引擎添加输入框教程

如何实现一个带参数的输入框
unit Q2;

inte**ce
uses Classes, SysUtils;

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

implementation

procedure InputString1(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var
I: Integer;
begin
for I := 0 to Args.Count - 1 do //循环取出参数
  Player.SendMessage(I.ToString + ':' + Args.Str<i>); //将内容发送到客户端供测试
end;

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
const
S =
[[


]];
//InputString1中使用了3个参数这个,第一个为"请输入：",这个固定为客户端显示的标题,第二三个则是在调用InputString1时可访问到的参数
//InputString和InputInteger一样,如果一旦使用了参数,则第一个参数就是标题,有效参数从第二个开始,玩家输入的内容则在返回的参数中的最后一个
//比如这里,将会得到的参数为:参数1,参数2,输入的内容
begin
  Npc.Say(Player, S);
end;

素色流年783

OMG！介是啥东东！！！

123457782

是爷们的娘们的都帮顶！大力支持

123457000

打酱油的人拉，回复下赚取积分

木子李皓

LZ帖子不给力，勉强给回复下吧

飞儿506

非常好，顶一下

忆神姆原们

好帖必须得顶起，多发点独家版本吧。。。

淡然一笑wwc

LZ帖子不给力，勉强给回复下吧

果仙奇缘称

very good

下一个秋天1

呵呵。。。