论坛的XB代码帮助写错了！

vczh

论坛的XB代码帮助写错了！  [em8]
点击帮助，拉到最尾，赫然看到：  [em5]
[size=文字大小]文字  [em7]
不是应该为吗？  [em10]
真粗心。写的人一定是一行一行复制后修改的，不是一行一行写的！  [em4]

vczh

sea_bug倒是去改啊。
a
a
a
a
a


ProgramaAutoP;

Procedurea自动灌水;
vara页号,帖号:Integer;
aaaa申请成功:Boolean;
aaaa论坛:T论坛;
Begin
aa论坛:=T论坛.Create;
aatry
aaaaFora页号:=0aToa论坛.论坛区数-1aDo
aaaaaaFora帖号:=0aToa论坛.论坛集[页号].帖数-1aDo
aaaaaaaa论坛.论坛集[页号].帖集[帖号].加帖('灌...。');
aaaaIfaMe.Is账号被封=TrueaThen
aaaaBegin
aaaaaa申请成功:=False;
aaaaaaRepeat
aaaaaaaa申请账号('名字','密码');
aaaaaaaa申请成功:=等待返回;
aaaaaaUntil(申请成功=True);
aaaaEnd;
aafinally
aaaa论坛.Free;
aaEnd;
End;aaaaaa

Begin
aa自动灌水;
End.aa

sea_bug

汗~~~~~ 我会尽力的。

这个论坛的代码也是很复杂，改起来还是有点困难。

vczh

帮助那一页也有代码？
a
a
a
a
a


ProgramaAutoP;

Procedurea自动灌水;
vara页号,帖号:Integer;
aaaa申请成功:Boolean;
aaaa论坛:T论坛;
Begin
aa论坛:=T论坛.Create;
aatry
aaaaFora页号:=0aToa论坛.论坛区数-1aDo
aaaaaaFora帖号:=0aToa论坛.论坛集[页号].帖数-1aDo
aaaaaaaa论坛.论坛集[页号].帖集[帖号].加帖('灌...。');
aaaaIfaMe.Is账号被封=TrueaThen
aaaaBegin
aaaaaa申请成功:=False;
aaaaaaRepeat
aaaaaaaa申请账号('名字','密码');
aaaaaaaa申请成功:=等待返回;
aaaaaaUntil(申请成功=True);
aaaaEnd;
aafinally
aaaa论坛.Free;
aaEnd;
End;aaaaaa

Begin
aa自动灌水;
End.aa

vczh

等了许久，未改。失望...

sea_bug

汗~~~~~~

到现在XB是什么都还没搞清。

vczh

example
[url=http://bj.163.com]163[/url]

铁拳

他说的是把 http://www.gameres.com/bbs/help.htm 最下面的

[size=文字大小]文字                插入指定大小的文字

里的 改为

汗……

vczh

对啊。Sea_Bug怎么不明白呢？

sea_bug

似乎是一些可以改变风格的代码，不过我也找不到具体处理这些代码的地方，vczh，你是否知道？告诉我，我直接去改。