with maindm.Qryorder do
begin
Close;
sql.Clear;
sql.Text := ' exec 存储过程名称 ';
ExecSQL;
myhs.warn1('费用同步成功!');
end;
转载于:https://my.oschina.net/u/3328774/blog/1560220
with maindm.Qryorder do
begin
Close;
sql.Clear;
sql.Text := ' exec 存储过程名称 ';
ExecSQL;
myhs.warn1('费用同步成功!');
end;
转载于:https://my.oschina.net/u/3328774/blog/1560220