delphi如何调用sql存储过程，并获取结果
adostoredproc1.Close;
adostoredproc1.ProcedureName:=''''sp_thchl'''';
adostoredproc1.Parameters.Clear;
adostoredproc1.Parameters.CreateParameter(''''out'''',ftInteger,pdoutput,1,1);
adostoredproc1.ExecProc;
edit1.Text :=adostoredproc1.Parameters[0].Value;
|
