adoquery动态参数怎么创建

Question

怎么创建动态的参数

Answer 1

aq为TAdoQuery控件
sql:='select id from type_table where name=:p1';
aq.SQL.Add(sql);
aq.Parameters.ParamByName('p1').Value:=sTitle;
aq.Open;

Answer 2

adoquery.sql.add('select id from type_table where name=:p1')；
adoquery.Parameters[0].value:=edit1.text；

Answer 3

adoquery.sql.add('select id from type_table where name=:p1')；
adoquery.parameters[0].datatype:=ftstring；
adoquery.Parameters[0].value:=trim(edit1.text)；

Answer 4

写在一个过程中如同：
//setStr是SQL语句，你也可以再添加几个参数，那看你自己需要了
procedure SetADOQueryProperties(ConnectionStr:TADOConnection;ADOQueryName:TADOQuery;SetStr:string);
begin
 try
  ADOQueryName.Active:=false;
  ADOQueryName.Connection:=ConnectionStr;
  ADOQueryName.Prepared:=true;
  ADOQueryName.SQL.Clear;
  ADOQueryName.SQL.Add(SetStr);
  ADOQueryName.open;
 except
  showmessage('连接数据时发生错误！');
end;