动态SQL语句的编程

核心提示： TQuery部件具有一个Params属性，它们在设计时不可用，动态SQL语句的编程(2)，在程序运行过程中可用，并且是动态建立的，使用这种赋值方法，必须要知道动态SQL语句参数的名字，当为TQuery部件编写动态SQL 语句时， Delphi 会自动地建立一个数组Params

TQuery部件具有一个Params属性，它们在设计时不可用，在程序运行过程中可用，并且是动态建立的，当为TQuery部件编写动态SQL 语句时， Delphi 会自动地建立一个数组Params，数组Params是以0下标开始的，依次对应动态SQL 语句中的参数， 也就是说动态SQL语句中第一个参数对应Params[0],第二个参数对应params[1]，依此类推。

例如：一个TQuery部件Query1，我们为它编写的动态SQL语句是：

　　Insert Into Customer(CustNo,Name,Country)

　　Values(:CustNo,:Name, : Country)

对于上述这条动态SQL语句中的参数，我们可以利用TQuery部件的params 属性为参数赋值：

　　Query1.params[0].AsString := "1988";

　　Query1.params[1].AsString := "Lichtenstein";

　　Query1.params[2].AsString := "USA";

上述语句将把"1988"赋给参数:Cuse_No，"Lichtenstein"赋给参数:Name，"USA"赋给参数:Country。

17.4.2 使用ParamByName方法为参数赋值

ParamByName是一个函数，用动态SQL语句中的参数作为调用ParamByName函数的参数，这样便可以为它们赋值，使用这种赋值方法，必须要知道动态SQL语句参数的名字。

例如在17.4.1节中的例子中，也可以用下述方法给参数赋值：

　　Query1.ParamByName('CustNo').AsString := "1988";

　　Query1.ParamByName('Name').AsString := "Lichtenstein";

　　Query1.ParamByName('Country').AsString := "USA";