设好aspStock_Fabtrim的procedureName为你数据库中存储过程 procedure TFrmStock_FabTrim_input_output.Refresh_aspStock_Fabtrim; begin with aspStock_Fabtrim do begin close; parameters[1].Value:=appendstatus; parameters[2].Value:=trim(dedPo_No.Text); ... prepared; open; end; end;
用ADOCommand:ADOCommand.CommandText:='Use Master'; ADOCommand.Execute; ADOCommand.CommandText:='exec a Gl';//a 为master库中的存储过程,gl为存储过程参数 ADOCommand.Execute;
1。把存储过程的执行语句直接写在Query中的SQL中
(如:Query.SQL.Text:='Exec Procename')如果前面又参数,还要把参数写到SQL中。
2。直接用StoredProc1来调用,把StoredProc1连接上数据库,在StoredProc1的
StoredProcName中可以找到写在数据库库的存储过程名称,如果有参数,在StoredProc的Params
属性中可以进行设置,有的数据库中不需要进行设置,有的则需要进行调整参数(如SyBase)
procedure TFrmStock_FabTrim_input_output.Refresh_aspStock_Fabtrim;
begin
with aspStock_Fabtrim do
begin
close;
parameters[1].Value:=appendstatus;
parameters[2].Value:=trim(dedPo_No.Text);
...
prepared;
open;
end;
end;
ADOCommand.Execute;
ADOCommand.CommandText:='exec a Gl';//a 为master库中的存储过程,gl为存储过程参数
ADOCommand.Execute;