关于存储过程问题请各位高手指教

object: xqconn:=TAdoconnection; loginprompt=false; connection=true
object: xqproc:=TAdostoreproc;  connection=xqconn; procedurename=Get_name
(@name @Sno)
object: xq:= TDatasource;    Dataset=xqproc
object: db:=TDBGrid datasource=xq
object: display:=TButton;
请问如何在点击display时在Db里显示此存储过程的结果(存储过程需要@name,@no)在哪个地方输入值，应如何输.