这样写的,我需要返回两个参数
proc1.ProcedureName:=proc_name;
proc1.Parameters.ParamByName('@acc_nbr').Value :=acc_nbr;
proc1.Parameters.ParamByName('@memo').Value :=memo;
proc1.Open ;
out_calling:=proc1.Parameters.ParamByName('@out_calling').Value;
out_memo:=proc1.Parameters.ParamByName('@out_memo').Value;有错,求教正确写法
proc1.ProcedureName:=proc_name;
proc1.Parameters.ParamByName('@acc_nbr').Value :=acc_nbr;
proc1.Parameters.ParamByName('@memo').Value :=memo;
proc1.Open ;
out_calling:=proc1.Parameters.ParamByName('@out_calling').Value;
out_memo:=proc1.Parameters.ParamByName('@out_memo').Value;有错,求教正确写法
ADOStoredProc1.Parameters.CreateParameter('@acc_nbr',ftString,pdInput,长度,nil);
ADOStoredProc1.Parameters.CreateParameter('@memo',ftString,pdInput,长度,nil);
ADOStoredProc1.Parameters.CreateParameter('@out_calling',ftString,pdOutput,长度,nil);
ADOStoredProc1.Parameters.CreateParameter('@out_memo',ftString,pdOutput,长度,nil);
...
proc1.ProcedureName:=proc_name;要不你把名字也手工加上去,然后
去掉proc1.ProcedureName:=proc_name;这句!