Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Me cierra Delphi totalmente al activar Query (https://www.clubdelphi.com/foros/showthread.php?t=28969)

JamesBond_Mx 09-01-2006 16:04:08

Me cierra Delphi totalmente al activar Query
 
Hola, Resulta que estoy utilizando un TQuery para hacer una consulta a la base de datos que consta de 5 Tablas, por decir un ejemplo algo así:

Código SQL [-]
Flujo.DB con 20 Campos y 100 Registros
Contratos.DB con 8 Campos y 20 Registros
Convenios.DB con 2 Campos y 7 Registros
Programas.DB con 2 Campos y 8 Registros
Proyectos.DB con 4 Campos y 20 Registros

La tabla FLujo.DB tiene un campo llave llamado Cve_Obra y tres campos por medio de los cuales se relaciona con las tablas Contratos.DB, Programas.DB y Proyectos.DB los cuales son respectivamente Num_Cto, Cve_Prog y Cve_proyecto, los cuales tienen las mismas caracteristicas en ambas tablas y y en sus tablas propietarias son campos llaves o sea, el campo Num_Cto es campo llave en la tabla Contratos.DB, el campo Cve_Prog es llave en la tabla Programas.DB y el campo Cve_proyectos es llave en la tabla Proyectos.DB.

Ahora en mi aplicación en un form inserto un TQuery y en su propiedad string al principio para probar puse lo siguiente:

Código SQL [-]
SELECT D.Num_Cto, D.Cve_prog, D.Cve_Proyecto, D.Obra, D.Aut_anual, D.Cierre_Anual, D.Dif_Aut_Cierre, D1.Descripcion, D1.Supervisor, D1.Compañia, 
FROM "D:\Mantto de Instalaciones\Presup\Flujo.DB" D, "D:\Mantto de Instalaciones\Presup\Contratos.DB" D1
WHERE D.Cve_Proyecto = 'AF' And D.Cve_prog = '5A'

Puse un DBGrid relacionado con el query y lo activé, me presentó los datos bien, tal y como los quiero, pero al hacer lo siguiente:

Código SQL [-]
SELECT D.Num_Cto, D.Cve_prog, D.Cve_Proyecto, D.Obra, D.Aut_anual, D.Cierre_Anual, D.Dif_Aut_Cierre, D1.Descripcion, D1.Supervisor, D1.Compañia, D2.Descripcion
FROM "D:\Mantto de Instalaciones\Presup\Flujo.DB" D, "D:\Mantto de Instalaciones\Presup\Contratos.DB" D1, "D:\Mantto de Instalaciones\Presup\Programas.DB" D2,
WHERE D.Cve_Proyecto = 'AF' And D.Cve_prog = '5A'

Y activar el Query, no me marca ningun error y me cierra el Delphi totalmente, lo mismo pasa si quiero hacer:

Código SQL [-]
SELECT D.Num_Cto, D.Cve_prog, D.Cve_Proyecto, D.Obra, D.Aut_anual, D.Cierre_Anual, D.Dif_Aut_Cierre, D1.Descripcion, D1.Supervisor, D1.Compañia, D2.Descripcion
FROM "D:\Mantto de Instalaciones\Presup\Flujo.DB" D, "D:\Mantto de Instalaciones\Presup\Contratos.DB" D1, "D:\Mantto de Instalaciones\Presup\proyectos.DB" D2,
WHERE D.Cve_Proyecto = 'AF' And D.Cve_prog = '5A'

Y por más que busco donde puede estar el error no lo encuentro, pensé que era problema de los campos llaves, pero no, ya chequé y todos estan bien tanto en la tabla Flujo como en las consecuentes o sea que son iguales los campos.

Algun consejo o ayuda?

Gracias.

FOURIER 11-01-2006 07:46:06

Eso te debe funcionar
 
Código:

SELECT D.Num_Cto, D.Cve_prog, D.Cve_Proyecto, D.Obra, D.Aut_anual, D.Cierre_Anual, D.Dif_Aut_Cierre, D1.Descripcion, D1.Supervisor, D1.Compañia, FROM Flujo as D, Contratos as D1WHERE D.Cve_Proyecto = 'AF' And D.Cve_prog = '5A'
Eso te debe funcionar

JamesBond_Mx 12-01-2006 15:47:39

Pues si funciona, pero me repite los registros


La franja horaria es GMT +2. Ahora son las 13:20:12.

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