Seleccionar varios registros de una tabla por un campo

[vhirginia]

Muchas gracias por vuestra atención,

Empezado por marcoszorrilla

Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * From MiTabla ');
Query1.Sql.Add('Where NIF = '+QuotedStr(Edit1.Text));//En Edit1 se supone
está el Nif.

Query1.Open;

//Con un Filtro
MiTabla.Filter:='NIF ='+QuotedStr(Edit1.Text);
MiTabla.Filtered:=True;

Saludos y buen rollo.

El problema es que no sabemos donde poner este código, o cual de los dos, si lo que lleva lo del Query o lo que pone debajo del filtro, y de todas formas, donde tendríamos que colocarlo.

Saludos de nuevo

[vhirginia]

Hola de nuevo,
No estamos seguras pero puede que lo del Query no nos funcione, porque no estamos trabajando con SQL?, es que nuestras tablas son Paradox...
Si no resolvemos este problema no podemos seguir. A ver si alguien nos echa una mano, porfavor
Muchísimas gracias

[jachguate]

hola vhirginia.

Te (les) recomiendo la lectura de un libro de delphi. Para comenzar, tenes uno que podes hallar en línea totalmente gratuito, y muy bueno. Es "La cara oculta de Delphi", que hallas en la web de su autor, Ian Marteens. Esto te introducirá al uso de los DataSets, los componentes DataAware y a muchos otros temas de la programación con delphi.

El código facilitado por marcos, debes ponerlo en el evento donde queres "filtrar" el contenido de la grilla. Podes elegir entre los dos (el primer trozo comienza en query1.close y termina en query1.open).

Hasta luego.

[vhirginia]

hola de nuevo y muchas gracias, seleccionamos el NIF con un DBLookUpComboBox y a partir de ahí es donde lo queremos sacar ¿qué es lo análogo a Edit1.Text en el DBLookUpComboBox?

[roman]

Vamos a tratar de resumir un poco.

El método de usar un query tiene que ajustarse un poco ya que tal como está tendrías que ejecutar la consulta cada vez que cambies el NIF. En su lugar usa consultas parametrizadas:

select * from clientes
where nif = :nif

Los dos puntos (:) indican que se trata de un parámetro cuyo valor se puede sustituir así:

Query.ParamByName('nif').AsString := valor del nif

Pero aquí el problema persiste en cuanto a que debes hacer la sustitución cada vez. Para llenar automáticamente este parámetro puedes usar la propiedad DataSource del Query asignándola al DataSource de donde estés listando los NIFs- el mismo que el que alimenta tu DBLookupComboBox. Al hacer esto, cuando cambies la selección en el combo automáticamente se mostrarán en el grid únicamente los registros asociados al nif escogido. Claro está que tu grid deberá estar ligado al Query via un DataSource.

Otra forma de hacer lo mismo, sin utilizar un Query es usando dos tablas, una para los clientes y otra para los nifs. La primera la enlazas al grid y la segunda al combo via sendos datasource y estableces la de nifs como tabla maestra de la de clientes (propiedades MasterSource y MasterFields).

De cualquier forma no están de más las observaciones de mis compañeros en cuanto a una lectura de los conceptos básicos de las componentes de bases de datos y yo añadiría el uso de SQL y relación entre tablas.

// Saludos

[vhirginia]

Muchas gracias,
Ya hemos soluccionado el problema sin usar el Query, simplemente con el filtro, en el evento OnClick del LookUpComboBox.
Un saludo

[CHiCoLiTa]

y si lo haces en el OnChange mejor?