Problema ejecución consulta

[nena_yei]

con:=con+') and apartado="L" and doc=1 order by lemaord';
  con:=stringreplace(con,'#','_',[rfReplaceAll]);
  dades.q1.close;
  dades.q1.sql.text:=con;
  screen.Cursor:=crHourglass;
  self.Cursor:=crHourglass;
  dades.q1.open;

Este es el fragmento donde está el código que falla. El código que hay antes es el montaje de la consulta y ponerlo aquí en el foro sería una locura, porque son demasiadas lineas. Espero que con esto os sirva.

Gracias