Filtrar

[pepelu1975]

si que me funciona, el problema es que si lo cierro y vuelvo a hacer una consulta en el QuickReport me sale la consulta nueva mas la anterior

[__cadetill]

mira de debuggear a ver que valores estás poniendo en el filtro. No tiene mucho sentido lo que comentas

[pepelu1975]

Me da la impresion que el problema no es del filtro sino del QuickReport que he creado, voy a ver que consigo sacar por ese lado.
Gracias por todo

[marcoszorrilla]

Código Delphi [-]
TObras.Filtered := False;
TObras.Filter := 'cod_expo = ' + QuotedStr(Edit1.Text);
TObras.Filtered := True;
ShowMessage(Tobras.Filter); //Para ver el contenido del filtro
FListadoObras.QuickRep1.PreviewModal;
FListadoObras.Close;

En el OnClose del Formulario que contiene QuickReport

Código Delphi [-]
Application.ProcessMessages;
FreeAndNil(QuickRep1);
Action:=CaFree;

Un Saludo.

[pepelu1975]

Me he fijado y la cuestion es que siempre que le pulso al boton de filtrar en el Qreport me aparecen todas las obras, tengan el codigo de exposicion que tengan

[__cadetill]

cod_expo es un valor numérico o de cadena? si es numérico, sobraría en QuotedStr

Por otro lado, has mirado de debuggear a ver que es lo que hace exactamente?

[pepelu1975]

el valor cod_expo es string (letras y numeros), no consigo encontrar el debugbear