千年新章服务端扩展背包

格子变动首先清空DB数据库

需要修改的文件

一,客户端: 

FWearItem.pas(新背包) 

deftype.pas 

FAttrib.pas(侠原背包) 

FnewMagic.pas

二,服务端:(服务端我好像就改了2个地方...可能还有没改的,但是新格子已经正常了.)

UUser.pas

uUserSub.pas

----------客户端:

1,FWearItem.pas:

背包每格子一个控件,原有30格,直接复制/粘贴控件你需要的数量后排序改名.

注意背包和任务格子要同步更改(这里要感谢"老花"大神指点).

格子控件加好后:

-搜"ILabels: array[0..30 - 1] of TA2ILabel;" 改为 ILabels: array[0..63 - 1] of TA2ILabel;

-搜"ILabelsQuest: array[0..29] of TA2ILabel;" 改为 ILabelsQuest: array[0..62] of TA2ILabel;

-搜"TFrmWearItem = class(TForm)"找到public内有个数组变量改掉"ILabels: array[0..63 - 1] of TA2ILabel;"

-搜"ILabels[29] := A2ILabelItem30;"按顺序添加你的控件,比如63格那就排到ILabels[62] := A2ILabelItem63;

-搜"ILabelsQuest[29] := A2ILabel_QItem29;"这是任务物品要同步和上边一样,63格到尾ILabelsQuest[62] := A2ILabel_QItem62;

-搜"TFrmWearItem.SetOldVersion;"找到ILabels[29]一样加到尾63格就是ILabels[62] := A2ILabelItem63;

2,修改全局常量deftype.pas

这里是db和tgs等相关联,改完记得控件全部编译一遍,以下4处地方改一下数字就行.(以63格为参考)

-搜"HAVEITEMSIZE"改为 HAVEITEMSIZE = 63;

-搜"HaveItemArr"改为 HaveItemArr: array[0..63 - 1] of TDBItemData_20091013;

-搜"HaveItemArr"改为 HaveItemArr: array[0..63 - 1] of TDBItemData;

-搜"HaveItemQuestArr"改为 HaveItemQuestArr: array[0..63 - 1] of TDBItemDataQuest;

验证是否成功方法:重新编译5个服务端软件和客户端,将DB数据库删掉,随便创建个角色进游戏下线,在DB上查找该角色看看物品背包是不是有63个.