如何在FUNCTION中调用ADO控件（给30分）

Question

function selectlift(isum:integer):string;
var
s: array[1..2] of string;
begin
if isum >150 then
begin
  s[1]:= ado1.fields[8].value;
  s[2]:= ado1.fields[9].value;
end
else if (isum > 130 and isum <140) then
begin
  s[1]:= ado1.field[10].value;
  s[2]:= ado1.field[11].value;
end；
如上边的代码。总说ADO1未明

Answer 1

ADO1->Form1.ADO1；此为自定义函数，窗体并不知道，用窗体的东西，要加上前缀啊

Answer 2

function selectlift(ado1:TADOTABLE(TADOQUERY);isum:integer):string;把你要操作的ADO传入即可

Answer 3

声明一个临时的ado对象也可以

Answer 4

如果你是动态生成的adoquery，那么你把adoquery的定义放到public里面，那么只要这个adoquery没有被释放掉，你在别的form里面都可以引用的。