delphi - 如何在 IntraWeb 的 TSmartQuery 中添加参数？

Question

如何在 TSmartQuery 中添加参数？我的意思是在“参数”选项卡上，当我单击参数属性时可以看到该选项卡。

我找到了两种方法： - 编辑 dfm 文件 - 根据 Sql 选项卡中使用的 :vars 自动填写参数。我没有设法使用用户界面手动添加它们。

Answer 1

TSmartQuery 是来自ODAC库的组件。

TSmartQuery 与其他 TQuery 系列类似，您可以根据需要以不同方式使用参数：

1. 如果您已经使用带有以下参数的 Sql，Qry1.Sql.Text := 'Select * from Table where Id = :id'; 那么您可以将定义的参数值定义为：Qry1.ParamByName('Id').asInteger := 10;

2. 如果您有来自 TParam 的实例，您可以添加到 qry 中，例如：Qry1.Params.AddParam(myParam).

3. 您可以使用以下方法创建参数并直接分配给 ParamList：Qry1.Params.CreateParam();

其中定义为：

function CreateParam(FldType: TFieldType; const ParamName: _string;
  ParamType: TParamType): TDAParam;

2 & 3 主要与存储过程一起使用，因为您需要定义参数是输入参数还是输出参数。

更新：当我发布我的答案时，我没有注意到您正在使用 Intraweb，但它应该与您使用普通 Delphi 应用程序的方式相同。