找回密码
 立即注册
虾米引擎源代码Delphi3KM2引擎源码20121218CQFIR飞尔引擎20120918源码文字广告位置4
APPLEM2引擎源代码传奇引擎delphi源代码DELPHI视频教程
GSQL_6.5.2.1源代码Delphi即时通讯Delphi源码文字广告位置11
文字广告位置12
文字广告位置13
文字广告位置14
文字广告位置15
文字广告位置16
UC845刺客引擎飞龙3delphi源码文字广告位置18
文字广告位置19
文字广告位置20
文字广告位置21文字广告位置22
文字广告位置23
文字广告位置24
文字广告位置25
文字广告位置26文字广告位置27文字广告位置28
查看: 872|回复: 0

A3M2 APPLEM2 行会限制名字10 注册名字限制2

[复制链接]

798

主题

42

回帖

4781

积分

管理员

积分
4781

最佳新人活跃会员热心会员推广达人宣传达人突出贡献优秀版主荣誉管理论坛元老

QQ
发表于 2019-4-19 15:03:05 | 显示全部楼层 |阅读模式
    M2 里的
OBJPLAY.PAS 13292行if not (length(sGuildName) in [6..20]) then begin
OBJNPC.PAS 5686行 if Integer(UserItem) in [16..20] then begin
OBJNPC_.PAS  15067行   if not (length(sGuildName) in [6..20]) then begin------------------------------------------------------------------------------------------------------------------
搜索6..14  用工具ActualSearchReplace搜索代码6..14 行会限制长度 改为6..20
6..14 注册人名限制长度 改为4..14
---------------------------------------------------------------------------------------------------------------------
DBSERVER USRSOC.PAS  1100行 if not (Length(sChrName) in [4..14]) then nCode := 4;
---------------------------------------------------------------------------------------------------------------------
MirClientTool

INTROSCN.PAS    1800 行if not (Length(chrname) in [4..14]) then begin


ClMain.pas 6180行
     if CompareText(rstr, '@@buildguildnow') = 0 then begin
        if mrYes = FrmDlg.DMessageDlg('请输入行会名称,长度3~10个汉字。', [mbYes, mbNo, mbAbort], 20, deStandard) then begin
          param := Trim(FrmDlg.DlgEditText);
        end;
      end else
      if CompareText(rstr, '@@guildwar') = 0 then begin
        if mrYes = FrmDlg.DMessageDlg('请输入对方行会名称,长度3~10个汉字。', [mbYes, mbNo, mbAbort], 20, deStandard) then begin
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Common Grobal2.pas  GuildNameLen = 20;----------------------------------------------------------------------------------------------------------------------------------------------------
M2Share.pas  3901行nGuildNameLen: 20;--------------------------------------------------------------------------------------------------------------------------------------------------------

Guild.pas1567行procedure TGuildManager.LoadGuildInfo;
var
  LoadList: TStringList;
  sGuildName: string[20];
  I: Integer;
  Guild: TGuild;
----------------------------------------------------------------------------
Grobal2.pas 1311行sGuildName: string[GuildNameLen];
    btMaxMeberCount: Byte;
    sCreateName: string[GuildNameLen];
--------------------------------------------------------------------------------
oldmirdb.pas [dbserver]

98行sGuildName: string[GuildNameLen];

12行SIZEOFTHUMAN = 44151; //44032  这个数字变了 轻则进不去游戏 重则玩家数据乱

dbshare.pas
---------------------------------------------------------------------------------------------------
m2share.pas
30行SIZEOFTHUMAN = 44151; //44032 这个数字变了 轻则进不去游戏 重则玩家数据乱
-------------------------------------------------------------------------------------------------------




回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|Delphi源代码

GMT+8, 2025-4-4 07:48 , Processed in 0.128724 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表