今天终于研制出每秒30次的渐变处理了。真高兴。

vczh

今天终于研制出每秒30次的渐变处理了。真高兴。[em2][em9]
a
a
a
a
a


哈哈哈，看我的长度4000的签名。谁说不能过200！
要看空格怎么做，按CTRL+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

coolvoldo

每秒30次什么啊。很快吗？
hoho

wang_zhen_wu

什么

sakura

代码代码 DEMO DEMO

eatgod_2002

纹理渐变??

vczh

我一向喜欢搞GDI
a
a
a
a
a


哈哈哈，看我的长度4000的签名。谁说不能过200！
要看空格怎么做，按CTRL+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