Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 14-06-2004
Avatar de guillotmarc
guillotmarc guillotmarc is offline
Miembro
 
Registrado: may 2003
Ubicación: Huelva
Posts: 2.638
Poder: 26
guillotmarc Va por buen camino
Veamos :

a) Evento OnChange.

Abre la lista de campos del Dataset, busca los campos que intervienen en el cálculo (PRECIO y CANTIDAD). En su evento AfterChange, escribe el código para asignar el resultado de su multiplicación al campo TOTAL

B) Campo Calculado

Vuelve a abrir la lista de campos del Dataset. Con el botón derecho dale a la opción de 'Add New Field', y al nuevo campo llámale Total, díle que es de tipo Decimal, y que será calculado (es la opción por defecto).

Entonces captura el evento OnCalcFields del Dataset, y escribe allí la asignación del valor del campo calculado :

Dataset.FieldValues['TOTAL'] := Dataset.FieldByName('UNIDADES').AsInteger * Dataset.FieldByName('PRECIO').AsFloat;

Saludos.
__________________
Marc Guillot (Hi ha 10 tipus de persones, els que saben binari i els que no).
Responder Con Cita
 



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


La franja horaria es GMT +2. Ahora son las 05:51:18.


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