Encontre la solucion era simple, el error estaba en la consulta teniq que ser asi
Código Delphi
[-]
QuickReport1.clientes.SQL.Add('WHERE id_vendedor = '+
vendedor.FieldByName('id_vendedor').AsString+' AND activado BETWEEN #'+
medt1.Text+'# AND #'+medt2.Text+'#');
tenia que estar entre numerales las fechas de consulta, por si alguien le pasa lo mismo....
Gracias a todos Saludos HoGueRa