Error en consulta sql TADOQuery

[hoguera]

hola amigos,
tengo problemas llamando una consulta sql a un TADOQuery me arroja el QReport vacio, el TADOQuery al principio tiene lo siguiente en el sql
Código Delphi [-]select * from clientes

luego le adiciono lo siguiente
Código Delphi [-]procedure TForm7.btn1Click(Sender: TObject); begin Form7.vendedor.Locate('vendedor', Form7.cbb1.Text,[loCaseInsensitive, loPartialKey]); try QuickReport1:=TQuickReport1.Create(self); QuickReport1.clientes.SQL.Add('WHERE clientes.id_vendedor = '+ Form7.vendedor.FieldByName('id_vendedor').AsString+' AND clientes.activado BETWEEN :'+Form7.medt1.Text+' AND :'+FORM7.medt2.Text); QuickReport1.clientes.Open; QuickReport1.Preview; finally QuickReport1.Free; end; end;

Saludos HoGueRa