对不起,没看清楚,更正一下:
adoquery1.close;
adoquery1.sql.text:='select aa.nextval as f_temp from dual';
adoquery1.open;
ShowMessage(adoquery1.FieldByName('f_Temp').AsString);
取一条记录中所有数据
adoquery.close;
adoquery.sql.text:='select aa.nextval as temp from dual';
adoquery.open;
for i:=0 to table1.Fields.Count-1 do
ShowMessage(adoquery.Fields[i].AsString);