mostrar consulta sql en un dbgrid

[ecfisa]

Para sacarte toda duda, podrías probar lo siguiente:
.Create una carpeta cualquiera, C:\Temp por ejemplo.
.Copiá desde C:\Documents and Settings\Administrador\Escritorio\taf\tablas, todos los archivos cuyo nombre sea docentes (docentes.*).

Echo esto tendrías que tener docentes.* en C:\Temp.

Luego probá con este código:

Código Delphi [-]
...
var
  ape: string;
begin
  with Query do
  begin
    DatabaseName:= 'C:\Temp';  // <- Aqui indicas la nueva ruta a la BD
    Close;
    SQL.Clear;
    SQL.Add('select APELLIDO,DNI,DIRECCION1,DIRECCION2,CPL,CPN,CPP,TELEFONO,E_MAIL1,E_MAIL2,A_MAIL3,E_MAIL4,ORIGEN ');
    SQL.Add('from docentes ');
    SQL.Add('where APPELLIDO = :parametro_ape');
    SQL.Add('order by APELLIDO');
    ParamByName('parametro_ape').AsString:= ape;
    Open;
  end;
...

Tendría que funcionar sin ningún problema.

Un saludo.

Edito: Me faltó poner la asignación que orginalmente haces en tu código [ ape:=edit1.text; ].

[rogercito]

me sigue saliendo el mismo error, ya no se q hacer, probe un monton de cosas y nada funciona, necesito resolver esto urgente, Si hay alguna otra sugerencia la acepto. Gracias

[Casimiro Noteví]

Pues pon tu código que lo veamos, no podemos adivininar, no vemos tu pantalla

[rogercito]

paso el codigo que tengo

Código SQL [-]
select  APELLIDO,DNI,DIRECCION1,DIRECCION2,CPL,CPN,CPP,TELEFONO,E_MAIL1,E_MAIL2,A_MAIL3,E_MAIL4,ORIGEN

from tabla_docentes

where APELLIDO=arametro_ape

order by APELLIDO

el codigo del boton es

Código Delphi [-]
procedure TForm38.Button1Click(Sender: TObject);
var
ape:string;
begin
 with Query1 do
  begin
    DatabaseName:= 'C:\Documents and Settings\Administrador\Escritorio\docentes';  // <- Aqui indicas la nueva ruta a la BD
    Close;
    ape:=edit1.text;
    SQL.Clear;
    SQL.Add('select APELLIDO,DNI,DIRECCION1,DIRECCION2,CPL,CPN,CPP,TELEFONO,E_MAIL1,E_MAIL2,A_MAIL3,E_MAIL4,ORIGEN ');
    SQL.Add('from docentes ');
    SQL.Add('where APPELLIDO = arametro_ape');
    SQL.Add('order by APELLIDO');
    ParamByName('parametro_ape').AsString:= ape;
    Open;
  end;
 end;

en la propiedad del QUERY tengo

en databasename vacio
y en datasource vacio

la propiedad de DATASOURCE tengo

en dataset ---> query1

la propiedad del DBGRID tengo

datasource---> datasource1

no entiendo cual es problema .. lo que tambien pasa es que el dbgrid esta vacio no sale absolutamente nada .. y me tendrian que aparecer los nombres de los campos o estoy equivocado?

[[oscarac]]

lee la respuesta de ecfisa
copia esas tablas docente.* a otra carpeta
y has la prueba como él te sugiere

ahora si no te sale error y el dbgrid esta vacio puede tratarse que el apellido que colocas en el edit no figure en la tabla o que sea parcial, entonces deberias modificar la consulta en la parte del where

Código Delphi [-]
where apellido = :Apellido

por

Código Delphi [-]
where Apellido like :Apellido

no olvides agregar el simbolo '%' al final en el like

[rogercito]

muchas gracias por su ayuda. Ya pude hacer la consulta. El unico problema que tengo es que solamente me busca en la primer palabra guardada en el campo nombre de la tabla..

por ejemplo si yo pongo el apellido me lo busca perfectamente, pero si yo pongo el nombre no me muestra nada... Si me podrian ayudar con eso seria barbaro. Muchas Gracias.

[ecfisa]

Empezado por rogercito

por ejemplo si yo pongo el apellido me lo busca perfectamente, pero si yo pongo el nombre no me muestra nada... Si me podrian ayudar con eso seria barbaro. Muchas Gracias.

Bueno, ese comportamiento pareciera lógico ¿ No ? Si estas consultando por el nombre sobre el campo APPELLIDO...

Ahora, si tenés la unión de apellido + nombre en el campo APELLIDO una forma de 'atajar' lo que te tiren en el Edit sería:

Código Delphi [-]
procedure TForm38.Button1Click(Sender: TObject);
begin
  with Query1 do
  begin
    DatabaseName:= 'C:\Documents and Settings\Administrador\Escritorio\docentes';  // <- Aqui indicas la nueva ruta a la BD
    Close;
    SQL.Clear;
    SQL.Add('select APELLIDO,DNI,DIRECCION1,DIRECCION2,CPL,CPN,CPP,TELEFONO,E_MAIL1,E_MAIL2,A_MAIL3,E_MAIL4,ORIGEN ');
    SQL.Add('from docentes ');
    SQL.Add('where APPELLIDO like :parametro_ape');
    SQL.Add('order by APELLIDO');
    ParamByName('parametro_ape').AsString:= '%' + Edit1.Text + '%';
    Open;
  end;
end;

Un saludo.