``` unit Q2; interface uses Classes, SysUtils; procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); implementation procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); begin Player.RequestURL('http://www.mywebsite.com?name=xxxx'); //执行一个POST操作,将数据提交到指定的地址,不会弹出浏览器窗口,仅做数据提交用途 end; end. ```