delphi调用存储过程高手指点.急急.

Question

过程如下:
名称：nlv_pa.mep
参数：
序号 名称 输入/输出 类型 说明
1 HPZL 输入 VARCHAR2(2) 种类，可以为空
2 HPHM 输入 VARCHAR2(16) 号码，可以为空
3 WFSJ 输入 DATE 违法时间，不可以为空
4 ZXJG 输出 INTEGER 执行结果，（见“附录1”）高手给一些这样的例子..谢谢 !!!!delphi中用哪个控件?

Answer 1

ADOStoredProc,ADOQuery，ADOCommand 这些都可以
做电子警察后台的吧:)

Answer 2

我喜欢用ADOQuery去执行
TSQL:=Format('Declare @rst Int Exec nlv_pa.mep ''%S'',''%S'',%D,@rst Select @rst As Rst ',[HPZL,HPHM,WFSJ]);
ADOQuery.sql.add(TSQL);
ZXJG=ADOQurey.FieldByName('rst').asInteger;