como paso parametros con TAdoQuery ..?

[saul saldaña]

Hola a todos, espero poder contar con su ayuda,, saben estoy usando el objeto TAdoQuery, pero quiero hacer una consulta en donde lleno el contenido del resultado en un combobox, pasandole un parametro por ejemplo :
//********************

TADOQuery.Close;
aSql := 'Select * from Tabla where campo1 = :vParametro ';
TADOQuery.SQL.Add(aSql);
TADOQuery.Parameters.ParamByName('vParametro').Value := Text1.Text;
TADOQuery.Open

While not not (TADOQuery.Eof) do
begin
Combo.Items.Add (TADOQuery.FieldByName('campo1').Asstring);
TADOQuery.Next;
end; //end del while
//*********************

NOTA : pero al momento de corre esto me dice el sig. error..
"Error de sintaxis en la expresion campo1, select * from Tabla Where
campo1 =? " .

Aprovechando el hilo.. que diferencia existe entre usar :
TADOQuery.Open y TADOQuery.Active := True;
TADOQuery.Close y TADOQuery.Active := Falsee;
y usar TADOQuery.ExecSql de los dos anteriores, para disparar una
consulta sql.


espero poder contar con su valiosa ayuda,, gracias de antemano..