campo filter firebird

[anubis]

Buenas, ya he cambiado todas mis base de datos a firebird en la aplicacion que estaba realizando, y funciona!!!. De momento sigo usando del tipo:
table1.fielbyname('codigo').asinteger, todavia nose como se podria hacer en sql.

La pregunta viene con los campos filter, porque pongo por ejemplo:

table1.filter:='Tipo = '+'1 Cama KSize';
table1.filtered:=true;
pero me arroja un error, para campos que no llevan espacios funciona pero para estos no funciona da error.
Esto es asi? o que estoy haciendo mal.

gracias

[jhonny]

Bueno, a pesar de que no nos dices cual es dicho error, yo creería que es porque faltan las comillas... osea debería ser asi:

Código Delphi [-]
table1.filtered := False;
table1.filter   := 'Tipo = '+'"1 Cama KSize"';
table1.filtered := True;

Por otro lado, dependiendo de lo que necesites, muchas veces deberias plantearte usar los filtros desde la consulta y no desde la propiedad Filter de los TQUery (Eso si, repito, dependiendo de lo que necesites).

Espero te sirva.

[[maeyanes]]

Hola...

Para acceder a Firebird te recomiendo que uses componentes como los IBExpress (IBX) o algunos otros como MDO...

Esto por que usar componentes TTable para acceder a los datos de Firebird es muy costoso en cuanto al tráfico en la red...

Para tu problema con los filtros, trata así:

Código Delphi [-]
Table1.Filter := 'Tipo = ''1 Cama KSize''';
Table1.Filtered := True

Pero lo optimo sería algo así (usando un componente TIBQuery de los IBX:

Código Delphi [-]
TIBQuery1.SQL.Text := 'select * from Tabla where Tipo = ''1 Cama KSize''';
TIBQuery1.Open;

Saludos...

[gendelphi]

También puedes hacerlo usando parámetros:

Código Delphi [-]
TIBQuery1.SQL.Text := 'select * from Tabla where Tipo = :Tipo';
TIBQuery1.ParamByName('Tipo').Value:= '1 Cama KSize ';
TIBQuery1.Open;

[anubis]

Gracias por las respuestas, me que da mucho por aprender de estas cosas.

Código Delphi [-]
table1.filtered := False;
table1.filter   := 'Tipo = '+'"1 Cama KSize"';
table1.filtered := True;

si en vez de poner '"1 Cama KSize, pongo una variable no funciona

Código Delphi [-]
cv:='1 Cama KSize';
table1.filtered := False;
table1.filter   := 'Tipo = '+cv;
table1.filtered := True;

Esto asi no funciona.

gracias de nuevo

[[Delphius]]

anubis,
Acostumbrate a usar QyotedSTr() y te olvidas del parto de controlar las comillas.

Código Delphi [-]
table1.Filter := 'Tipo = ' + QuotedStr(cv));

Y como consejo, en lo posible evitate empler filter. Es un proceso que en ocasiones suele ser lento. Se gana más perfomance empleando su variante: una consulta SQL. Y en este tema de las consultas SQL, lo mejor es emplear parámetros, tal como lo demuestra gendelphi.

Saludos,

[[RONPABLO]]

Empezado por ayuda Delphi sobre Filter en los IBX

Specifies rows in a dataset that meet the filter conditions.

property Filter: string;

Description

Use the Filter property to restrict the rows in the dataset to those that meet the filter conditions. The syntax for Filter is the same as the search condition that appears after a WHERE clause in a Select statement. For example, to view only those records where the value in the Country field contains 'France' or 'Fiji':

Country = 'France' or Country = 'Fiji'

You can use standard SQL wildcards such as percent (%) and underscore (_) in the condition when you use the LIKE operator. The following filter condition retrieves all Countries beginning with 'F':

Country LIKE 'F%'

To view rows that have a NULL value in the Country column and Contact_Name is not NULL, use the IS operator:

Country is NULL and Contact_Name is not NULL

You can also use complex expressions in filter clauses. The following example retrieves rows containing Country values that use Francs as currency.

Country IN (SELECT Country from Country where Currency = '_Franc')

No entiendo porque puede ser lento el trabajar con Filters?