Consulta Sql con query

[bogdanioanliviu]

Empezado por microbiano

que tal si cambias el query1. execSQl por Query1.open;


normalmente exec es para cuando quieres hacer una instruccion de insertar,modificar o eliminar, para consultas usa open.

saludos, por cierto usa las etiquetas delphi para que tu codigo se vea mejor.

Por desgracia sigue igual.
El programa no devuelve ningun error el problema que tengo es que el param puede tener 2 val : a y b , que seguro se encuentran en la base de datos.
si le escrivo el texto a mano "select ..... city='a' " directamente en el query pues funciona. si lo intento usar con param no .

[ContraVeneno]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 with query1 do begin
  Close;
  SQL.Clear;
  SQL.add('select Campos');
  SQL.Add('from project');
  SQL.Add('where city=:param');
  ParamByName('param').AsString:=combobox1.Text;
  Open;
  dbgrid1.Refresh;
 end; //with
end;

eso debe de funionar, si no funciona, es porque combobox1.text no te está dando el valor que tu quieres... ¿no será que debes usar ItemIndex en lugar de Text para tomar el valor?

Además, lo que pongas en tu Combo debe de ser exactamente igual a lo que tengas en tu case de datos, en este caso, creo que sería mejor un LookUpComboBox...

[bogdanioanliviu]

Empezado por ContraVeneno

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin with query1 do begin Close; SQL.Clear; SQL.add('select Campos'); SQL.Add('from project'); SQL.Add('where city=:param'); ParamByName('param').AsString:=combobox1.Text; Open; dbgrid1.Refresh; end; //with end;


eso debe de funionar, si no funciona, es porque combobox1.text no te está dando el valor que tu quieres... ¿no será que debes usar ItemIndex en lugar de Text para tomar el valor?

Además, lo que pongas en tu Combo debe de ser exactamente igual a lo que tengas en tu case de datos, en este caso, creo que sería mejor un LookUpComboBox...

Gracias funciona por que no me da ningun error. Pero sigue sin ponerme los rezultados en el dbgrid.
Y no intiendo por que.

[Neftali [Germán.Estévez]]

Prueba la misma consulta pero sin el WHERE.
¿Salen datos ahora?

Si es que sí, intenta comprobar lo que estás pasando como parámetro. Si es que no, debe ser por otra cosa. Revisa que tengas creadas las columnas en el Grid y vuelve a crearlas.

[microbiano]

por curiosidad tienes enlazado el DGbrid a un DataSource y este al Query?, digo si no es asi como quieres hacerlo?

[[Chris]]

Otra sugerencia, cerciórate de la capitalización de las letras. Muchas veces nos dan dolores de cabeza joyitas como estas.

Saludos,
Chris

[bogdanioanliviu]

Empezado por Chris

Otra sugerencia, cerciórate de la capitalización de las letras. Muchas veces nos dan dolores de cabeza joyitas como estas.

Saludos,
Chris

Si estube atento a las letras. No es por A or a en las palabras que uso para la busqeda.

por curiosidad tienes enlazado el DGbrid a un DataSource y este al Query?, digo si no es asi como quieres hacerlo?

Claro que si
Tengo

Tdatabase
Tdatasource
tDbgrid
tquery

datasource apunta al query
dbgrid apunta al datasource

[bogdanioanliviu]

Empezado por Neftali

Prueba la misma consulta pero sin el WHERE.
¿Salen datos ahora?

Si es que sí, intenta comprobar lo que estás pasando como parámetro. Si es que no, debe ser por otra cosa. Revisa que tengas creadas las columnas en el Grid y vuelve a crearlas.

sigue sin funcionar da egual que con o sin with
Por que hay que crearlas a mano ? se sopone que cuando activo el query tendria que activarse la conexion con el dbgrid y crear de forma automatica las columnas.
DE toda forma esta creando de forma automatica las columnas de la tabla pero lo que no hase es popular el dbgrid con los valores.

El parametro esta conf como string y imput .
Me entra unas ganas de llevar a patadas el pc . Esto es algo simple pero no intiendo por que no funciona.

[Neftali [Germán.Estévez]]

Otra opción es que subas un pequeño proyecto de ejemplo (puedes crear un proyecto con un formulario similar al que tienes) y con unos datos de ejemplo y le echamos un vistazo. Estoy convencido de que debe ser una tontería, pero sin ver más es difícil saber qué puede estar pasando.

[bogdanioanliviu]

Empezado por Neftali

Otra opción es que subas un pequeño proyecto de ejemplo (puedes crear un proyecto con un formulario similar al que tienes) y con unos datos de ejemplo y le echamos un vistazo. Estoy convencido de que debe ser una tontería, pero sin ver más es difícil saber qué puede estar pasando.

Aqui esta puesto el project con la db de test.
es una db de access y utilizo delphi 2010.
si necesitas mas info ....
no lo puedo subir por el tamaño.
el link para mis doc´s :
https://docs.google.com/leaf?id=0B6w...thkey=CPK-7u4P
Gracias por la ayuda.