十万火急！请问那位大虾知道如何在ADOquery组件中对参数进行动态赋值！！感激之至！！

Question

With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add(' Select Field1,Field2 From Table1')
SQL.Add(' Where Field1= :ID and Field2=30');
Parameters.ParamValues['ID']:=20;
Open;
end;

Answer 1

agree with  eulb(执子之手,与子偕老)

Answer 2

With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add(' Select Field1,Field2 From Table1')
SQL.Add(' Where Field1= :ID and Field2=30');
Parameters.ParamByName['ID'].value:=20;
Open;
end;

Answer 3

可以通过别一个组件赋值：
with adoquery1 do
  begin
    close;
    datasource:=datasource2;
    sql.clear;
    sql.add('insert into table1 values(:ID,:.............)');
    execsql;
  end;