Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 22-05-2006
nenufer nenufer is offline
Miembro
 
Registrado: dic 2005
Posts: 90
Poder: 19
nenufer Va por buen camino
Question TQuery

Buenos dias!!
Estoy utilizando un dblookupcombobox que me muestra todos los clientes que tengo. El loockupcombobox es un campo de una tabla que se relaciona con la de clientes y es una de las columna de un grid.
Tengo un Tquery y un Datasource.
Relaciono el datasource con el Tquery y el Tquery con el databasename.
Y rellena la propiedad Sql de forma dinamica.Quiero que me muestre todos los clientes que no esten dados de baja. Tengo un procedimiento :

Código Delphi [-]
procedure QueryClientes();
begin
 clear;
 Query.sql.add('select *');
 Query.sql.add('from clientes');
 query.sql.add('where Fecha_baja is null');
 query.execsql;
end;

Entonces lo siguiente que hago es relacionar el query con el campo looupup de la tabla. Pero me siguen saliendo todos. Al procedimiento lo llamo en el oncreate del formulario.

Me falta algo por hacer?. Si lo hago lo hago sin procedimiento,directamente en la propiedad sql. Si que me lo muestra como quiero pero no me refresca. Hago un query.refresh. Pero no hace nada, hay alguna otra forma de refrescar para que me funcione?

gracias.
Responder Con Cita
  #2  
Antiguo 22-05-2006
Avatar de Sotrono
Sotrono Sotrono is offline
Miembro
 
Registrado: abr 2004
Ubicación: Buenos Aires - Argentina
Posts: 396
Poder: 21
Sotrono Va por buen camino
Hola, proba con esto:

Código Delphi [-]
procedure QueryClientes();
begin
  with Query1 do begin
    Close; //Cerras la consulta que estaba abierta
    SQL.Clear;
    SQL.Add('select *');
    SQL.Add('from clientes');
    SQL.Add('where Fecha_baja is null');
    Open; //Abris la nueva consulta
  end;
end;

ExecSQL se utiliza para consultas de modificacion, como DELETE, INSERT, etc.

Bytes!!
Responder Con Cita
  #3  
Antiguo 22-05-2006
nenufer nenufer is offline
Miembro
 
Registrado: dic 2005
Posts: 90
Poder: 19
nenufer Va por buen camino
Buenas!! Gracias por contestar.
He puesto el open y la llamada en el oncreate. El campo lookup(lookupcombobox) donde muestro los clientes lo relaciono con el query con la propiedad lookupdataset. Me compila y cuando voy a utilizar ese formulario me da un error : Invalid use of keyword. Token:select.
Es necesario que lo relacione con el campo lookup,no?
Si lo hago en tiempo de diseño, funciona.
Pero me gustaria hacerlo en tiempo de ejecucion

En tiempo de ejecucion la propiedad sql del componente,tengo que rellenarla con algo para poder ejecuta, no?
Gracias

Última edición por nenufer fecha: 22-05-2006 a las 16:48:36.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problema con TQuery del BDE AGAG4 Conexión con bases de datos 9 27-01-2006 16:15:58
Problemas con Tquery Coco_jac Varios 4 26-12-2005 18:43:33
TQuery o TTable mutant09 Conexión con bases de datos 1 28-04-2004 09:41:57
Ttable y Tquery dvdjr Varios 3 20-05-2003 17:15:57


La franja horaria es GMT +2. Ahora son las 12:48:19.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi