77M2引擎如何读写文本文件，传奇一条龙版本中读写文本文件的方法

如何读写文本文件
unit Q2;

inte**ce
  uses Classes, SysUtils;        

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

implementation

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var
  AList: TStrings;
  AName: String;
  I: Integer;   
  APlayer: TPlayObject;   
begin
  //TStrings访问文本文件的方式：
    AList := TStringList.Create;
  try                 
    //出于对版本使用者机器的保护出发(非开发者),引擎中的脚本读写只允许Mir200\Envir目录下的文件,Gamelib.EnvirPath可以取得
    if SysUtils.FileExists(Gamelib.EnvirPath + 'UnMaster.txt') then //如果文件存在
    begin
      AList.LoadFromFile(Gamelib.EnvirPath + 'UnMaster.txt'); //加载文件
      for I := AList.Count - 1 downto 0 do
      begin
        AName := AList[I]; //取出一个名字
        APlayer := Gamelib.FindPlayer(AName); //查找玩家
        if APlayer <> nil then
        begin
          //针对APlayer做些事情      
        end;
        AList.Delete(I); //删除文本中的一条记录
      end;
      AList.SaveToFile(Gamelib.EnvirPath + 'UnMaster.txt'); //把修改后的文件保存下来
    end;
  finally
    AList.Free;
  end;
end;

end.

版权声明

1、本站所有内容均由互联网收集整理、网友上传，仅供大家参考、学习研究使用，不存在任何商业目的与商业用途。

2、论坛的所有内容都不保证其准确性，完整性，有效性，因本站内容因误导等因素而造成的损失本站不承担连带责任。

3、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则：为了学习和研究软件内含的设计思想和原理，通过安装、显示、传输或者存储软件等方式使用软件的，可以不经软件著作权人许可，若有用户需要商用本站资源，请务必联系版权方购买正版授权！

感谢站长努力更新这么多资源

爱上论坛-速记=爱上你GM,版本下载,素材下载,脚本下载,服务器租用,传奇一条龙,等各种业务都有!

仿盛大热血传奇

sf999网站

感谢楼主提供这么好的论坛」

这个帖子不回对不起自己！

传奇论坛里面相对来说比较好的一个！感谢站长分享的技术教程。

感谢站长分享开区一条龙教程，新手能学习到很多知识。