Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-07-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Cita:
Empezado por nena_yei Ver Mensaje
Para copiar la consulta sql que ejecuta en ese momento (la grande) en un fichero externo, así en plan rápido para tener una especie de LOG para luego ponerlo directamente en la propiedad SQL del componente Query, como lo hago? Es que no suelo trabajar con Delphi y seguro que hay una manera rápida y sencilla de hacerlo.
Hola de nuevo, puedes utilizar un StringList y hacer algo como esto:

Código Delphi [-]
var
 sl :TStringList;
begin
 sl := TStringList.Create;
 Try
  sl.Add(Query.SQL.Text);
  sl.SaveToFile('Archivo.txt');
 Finally
  sl.Free;
 end;

Revisa bien que las consultas que estas generando esten bien, como te ha indicado Neftali.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #2  
Antiguo 06-07-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
También puedes mostrarnos la consulta que se genera en la que te da error.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #3  
Antiguo 06-07-2010
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.339
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
¡Qué grande Caro! (me has leído la mente)
Justamente lo que te ha comentado.

Si además añades esto al código:

Código Delphi [-]
var
 sl :TStringList;
begin
 sl := TStringList.Create;
 Try
  if FileExist('c:\Archivo.txt') then begin
    sl.LoadFromFile('c:\Archivo.txt');
  end;
  sl.Add(Query.SQL.Text);
  sl.SaveToFile('c:\Archivo.txt');
 Finally
  sl.Free;
 end;
Tendrás un fichero que va guardando historial de todas las consultas que ejecutas.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #4  
Antiguo 06-07-2010
nena_yei nena_yei is offline
Miembro
 
Registrado: abr 2009
Posts: 60
Poder: 16
nena_yei Va por buen camino
Os cuento..he hecho lo que me habéis comentado, gracias! Y una vez tenía guardada la consulta en el archivo Archivo.txt, la he puesto en el Query manualmente en la propiedad SQL, he puesto la sentencia Open del query al principio de todo de la aplicación, donde no hay nada más y salta el mismo error! Y he ejecutado la consulta en Access y funciona correctamente, así que el código sql está bien.

Como podría solucionarlo¿? Ahora ya sé que no tiene nada que ver con componentes de aquella parte donde lo estaba ejecutando ni nada, porque ahora lo he puesto al inicio y salta el mismo error.

Muchas gracias, se os ocurre como hacerlo?

Un saludo
Responder Con Cita
  #5  
Antiguo 06-07-2010
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.339
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por nena_yei Ver Mensaje
...he puesto la sentencia Open del query al principio de todo de la aplicación, donde no hay nada más y salta el mismo error! Y he ejecutado la consulta en Access y funciona correctamente, así que el código sql está bien.
Hola; Bueno, poco a poco vamos afinando....

¡¡Craso error el pensar que lo que funciona en Access funciona también desde un TADOQuery (que supongo que es lo que estás utilizando) o un TQuery.

Los ficheros de datos del Motor Jet4 son ficheros MDB. Access no es más que un programa para gestionar esos ficheros y la sintaxis de Access no es del todo estandard, así que hay "determinadas cosas" que funcionan en Access y no funcionan fuera (desde ADO, por ejemplo).

Debeías poner la sentencia para verla, o eliminar paulatinamente partes de la sentencias e ir lanzándolas desde el Query, para ver qué parte es la que falla.

Por ejemplo, algunas cosas que pueden fallar "desde fuera", son los parámetros de Access (esta es evidente), tema de fecha (por los separadores), algunas funciones (iif,...),....
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #6  
Antiguo 06-07-2010
nena_yei nena_yei is offline
Miembro
 
Registrado: abr 2009
Posts: 60
Poder: 16
nena_yei Va por buen camino
Te cuento..he ejecutado todas las partes por separado y no hay ningún problema, las ejecuta todas correctamente, sin errores y con los resultados correctos.
Junto dos partes y no hay problema, junto 4 partes y nada, pero cuando pongo 5 partes, salta el error. No sé si es que en ese momento el TQuery se satura o que.. No es un trozo de código concreto el que falla, sino cuando lo pongo todo junto y hay demasiado. Por eso creo que es algo de que el TQuery se vuelve loco con tanta consulta o que tiene X carácteres permitidos y salta el error, o algo de memoria. Porque si fuera el sql al ponerlas por separado también fallarian, y no es ningún fragmento en concreto.
Responder Con Cita
  #7  
Antiguo 06-07-2010
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.339
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
¿De cuantos caracteres hablamos? ¿Los has contado? ¿Cuantos tiene con 4 trozos y cuantos con 5 trozos?
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #8  
Antiguo 06-07-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola de nuevo nena_yei.

Sigue siendo muy ambiguo el tema, me hubiera gustado saber con que base de datos estás trabajando y con que componentes te conectas con ella...

Pero a ver si esto te sirve: (Solution--IDSQL32.DLL and Access Violations)

http://<a href="http://delphi.cjcsof...a=page%3D1</a>

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 06-07-2010 a las 18:41:01.
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 ejecucion de consulta SQL por codigo (Firebird) Cheerpipe Conexión con bases de datos 2 10-10-2007 18:05:20
Problema con ejecución de DTS grotero76 Conexión con bases de datos 4 20-09-2007 20:05:07
Problema con ejecucion tal0 Varios 2 07-08-2007 09:07:59
Error en Consulta de tablas creadas en tiempo de ejecucion javicho_villa Varios 1 02-02-2006 17:14:28
Problema De Ejecucion delphicano Conexión con bases de datos 4 14-05-2003 13:54:55


La franja horaria es GMT +2. Ahora son las 03:20:59.


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