Delphi调用存储过程赋值给edit的问题，在线等！！！

[wjfxyj]

调用存储过程如下代码，在DBGrid中能正常按@id显示
procedure TTestProcedures.selectonclick(Sender: TObject);
begin
with ADODataSet1 do
begin
Active:=false;
CommandType:=cmdStoredProc;
CommandText:='usp_selectone';
Parameters.Clear;
Parameters.AddParameter;
Parameters[0].Name:='@id';
Parameters[0].Direction:= pdInput;
Parameters[0].DataType:=ftString;
Parameters.Refresh;
Parameters.ParamByName('@id').Value:=Edit1.Text;
Active:=true;
ExecuteOptions;
end;
end;
我想把符合条件的记录（表test有3个字段id,aaaaa,bbbbb）
分别赋给edit2,edit3,edit4
如何做，最好有详细代码

[CACACACACA]

我是按这个来的。 （表test有3个字段id,aaaaa,bbbbb）

[wjfxyj]

1楼
字段aaaaa,bbbbb在edit3,edit4能显示，但id不能在edit2上显示（出错）
当窗体启动时，调用GETALL时DBGrid显示3列（id,aaaaa,bbbbb）
执行Select按钮后（就是上述代码时），只能显示2列（aaaaa,bbbbb）
何故？？？

[dinoalex]

可能是返回类型的问题吧,inttostr

[CACACACACA]

edit2.text := adodataset1['id'];
edit3.text := adodataset1['aaaaa'];
edit4.text := adodataset1['bbbbb'];

[CACACACACA]

Active:=true;
//ExecuteOptions; 应该是没有的吧。

[wjfxyj]

1楼
ADODataSet1:field'id' not found