[求助]delphi与informix存储过程的一些问题

刚开始学习存储过程,通过BDE方式与informix数据库连接:
写了如下代码:
procedure TForm1.RzGroup2Items1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('create procedure sq2()');
adoquery1.SQL.Add('returning char(22);');
adoquery1.SQL.Add('define tmea char(22);');
adoquery1.SQL.Add('select shebname into tmea from aaa where lydate="20061001";');
adoquery1.SQL.Add('end procedure');
adoquery1.ExecSQL;
end;
请问如果希望将查询到的shebname通过DBGRIDEH显示出来该如何做呀?
如果查询的数据量大时,此种方式是否会比下列方式速度快呢?
procedure TForm1.RzGroup2Items1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select shebname into tmea from aaa where lydate="20061001";');
adoquery1.open;
dbgrideh1.columns[0].fieldname:='shebname';
end;
谢谢了