求教:使用adoquery执行oracle pl/sql语句，取得返回值的问题！！在线等待！

delphi中使用adoquery执行sql语句
declare
a integer;
begin
  a := 1
end;使用adoquery的Open能正常运行该sql，可是怎么取得a的值呢？
使用query执行该pl/sql是否可以取得返回值？
因为是在原有的库上做开发，所以不能在该库中建立存储过程，
所以希望能找到办法从pl/sql中返回值，在ado中能取到吗？