这个函数哪里有问题(50分)

绯

绯红之王

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-08

• #1

function numquery(varray : array of tadoquery):byte;
begin
setlength(varray,high(varray)+2);
result := high(varray)+1;
end;

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-08

• #2

type tarrayadoqry=array of tadoquery;
function numquery(var varray : tarrayadoqry):byte;
begin
setlength(varray,high(varray)+2);
result := high(varray)+1;
end;

 

D

duhai_lee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-08

• #3

这样的处理写函数啊。
用数组挺不方便的，我希望用list装。

 

死

死神十三

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-09

• #4

varray是参数
不能变动
varray改为全局变量

 

绯

绯红之王

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-11

• #5

多人接受答案了。