FDSP.Close ;
FDSP.Params.Clear ;
mParam := FDSP.Params.Add ;
with mParam do
begin
Name := '@T1' ;
DataType := ftString ;
//FDDataType := dtString ;
ParamType := ptInput ;
Size := 50 ;
Precision := 0 ;
NumericScale := 0 ;
Value := Edit1.Text ;
end;
FDSP.StoredProcName := 'Z_Test' ; // 如果此句写在了对创建参数之后, 导致开始创建的参数没有了
因而在创建参数前, 要先对StoredProcName赋值