Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-10-2008
einarcito einarcito is offline
Miembro
 
Registrado: may 2008
Posts: 101
Poder: 17
einarcito Va por buen camino
Problema con Query y tabla

hola chicos tengo un problemita, estoy con un sistema de ventas el cual necesito hacer una suma de los subtotales de todas las lineas de ventas y el resultado colocarlo en un Tedit. Lo q estoy haciendo es esto. Nose si tiene algun sentido para uds.

Código Delphi [-]
with dm.qpagar do begin
      active:=false;
      sql.Clear;
      sql.Add('SELECT sum(subtotal) as total from ventaActual ');
      active:=true;
      qpagar:= fieldbyname('total').asVariant;
      editTotal.Text:=dm.qpagar;
los errores q me da son:
[Error] UnitVentas.pas(227): Undeclared identifier: 'qpagar'
[Error] UnitVentas.pas(228): Incompatible types: 'String' and 'TQuery'
[Fatal Error] sistema.dpr(25): Could not compile used unit 'UnitVentas.pas'

fundamentalmente el compilador me marca en esta linea

qpagar:= fieldbyname('total').asVariant;


Gracias.

Última edición por marcoszorrilla fecha: 26-10-2008 a las 10:17:39.
Responder Con Cita
  #2  
Antiguo 26-10-2008
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Código Delphi [-]
with dm.qpagar do begin
      active:=false;
      sql.Clear;
      sql.Add('SELECT sum(subtotal) as total from ventaActual ');
      active:=true;
      editTotal.Text:=dm.qApagar.Fields[0].AsString;


Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 26-10-2008
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.549
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
Iba a comentarte que con casi 70 mensajes ya deberías haber aprendido a usar TAGS, aunque veo que otra persona (marcos) ya ha hecho el trabajo.

En cuanto al error, pues el primero se debe a que en varios sitios haces referencia a qpagar sin poner delante dm. como has hecho en la primera línea.

Personalmente nunca me ha gustado el with, porque a veces lía más las cosas y da más problemas que las ventajas que ofrece. Este es un ejemplo de ello.

Mi opinión es que elimines el with y pruebes el código sin él.

El segun error es por esta línea:

Código Delphi [-]
editTotal.Text:=dm.qpagar;
en la que estás intentando asignar a un string (izquierda) una cosa que es un TQuery/TTable (derecha).

EDITO: Veo que Marcos ya ha completado el mensaje.
por faor utiliza TAGs.
__________________
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 26-10-2008
einarcito einarcito is offline
Miembro
 
Registrado: may 2008
Posts: 101
Poder: 17
einarcito Va por buen camino
problema con query y tabla

gracias chicos me funciono, no se cual es el tag para la sintaxis de delphi :S
Responder Con Cita
  #5  
Antiguo 26-10-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 22
enecumene Va por buen camino
Cita:
Empezado por einarcito Ver Mensaje
gracias chicos me funciono, no se cual es el tag para la sintaxis de delphi :S
El TAG de Delphi es el que está al lado del SQL ese que parece un monumento romano . Además lo puedes poner manual de la siguiente forma:

[ DELPHI] codigos [/DELPHI ]

Nota: no puede haber espacios entre los corchetes, lo hice así para que vieras como ejemplo.

Saludos.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #6  
Antiguo 26-10-2008
einarcito einarcito is offline
Miembro
 
Registrado: may 2008
Posts: 101
Poder: 17
einarcito Va por buen camino
Ok gracias. ahora una cosita
Código Delphi [-]
dm.query.fields[0].asstring
el fields[0].asstring seria lo mismo q un fieldbyname.AsVariant? cual es la diferencia porq la cual no anda mi programa?
Responder Con Cita
  #7  
Antiguo 26-10-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 22
enecumene Va por buen camino
Cita:
Empezado por einarcito Ver Mensaje
Ok gracias. ahora una cosita
Código Delphi [-]dm.query.fields[0].asstring

el fields[0].asstring seria lo mismo q un fieldbyname.AsVariant? cual es la diferencia porq la cual no anda mi programa?
Fields[0].Asstring llama al campo a través del índice de los campos persistentes del Dataset, y FieldByName('campo').asstring llama al campo por su nombre. FieldByName.AsVariant no estás llamando ningún campo por ende no te funciona.

Saludos.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #8  
Antiguo 26-10-2008
einarcito einarcito is offline
Miembro
 
Registrado: may 2008
Posts: 101
Poder: 17
einarcito Va por buen camino
muy biennn mas que claro muchas gracias hasta la proxima
Responder Con Cita
  #9  
Antiguo 26-10-2008
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.549
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 einarcito Ver Mensaje
gracias chicos me funciono, no se cual es el tag para la sintaxis de delphi :S
Poner TAG's en los códigos Delphi

No era tan difícil
__________________
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
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
Tabla que llena un query eduarcol Conexión con bases de datos 11 27-03-2008 23:17:02
consulta a un query en vez de a una tabla eldiegofg SQL 10 19-09-2007 13:46:39
Manipular una tabla con Query en interbase David Conexión con bases de datos 2 13-11-2006 12:25:38
Cómo sincronizar Query y tabla David Conexión con bases de datos 2 13-07-2006 12:18:50
Tabla externa en query llonigualker Conexión con bases de datos 3 28-04-2006 13:14:22


La franja horaria es GMT +2. Ahora son las 00:51:30.


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