Club Delphi  
    Paypal   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

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 04-02-2011
Nacho5 Nacho5 is offline
Registrado
NULL
 
Registrado: feb 2011
Posts: 6
Poder: 0
Nacho5 Va por buen camino
Smile Grabar un campo calculado.

¡ Hola de nuevo !

Código lo que se dice código, no hay mucho. Dado que no tengo mucha base para ello. El que hay es el que implementa Delphi a la hora de diseñar la aplicación. Pero para que veas lo que tengo sería esto :
_________________________________________________________________
Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, DBTables, StdCtrls, Mask, DBCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    Table1: TTable;
    DataSource1: TDataSource;
    Table1Num1: TCurrencyField;
    Table1Num2: TCurrencyField;
    Table1Suma: TCurrencyField;
    Table1calculado: TCurrencyField;
    Label1: TLabel;
    DBEdit1: TDBEdit;
    Label2: TLabel;
    DBEdit2: TDBEdit;
    Label4: TLabel;
    DBEdit4: TDBEdit;
    DBNavigator1: TDBNavigator;
    procedure Table1CalcFields(DataSet: TDataSet);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation


{$R *.dfm}

procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
       DataSet['calculado']:= DataSet['Num1']+DataSet['Num2'];
end;

_________________________________________________________________
En la tabla( que denominé Suma.db tiene a su vez un campo Suma ) que debe registrar el valor del campo calculado( llamado calculado ). No sé como hacerlo por más que he intentado de una y otra forma. He leído cosas en este foro que me ha llevado a saber plantear un campo calculado viendo lo del :
Código Delphi [-]
procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
       DataSet['calculado']:= DataSet['Num1']+DataSet['Num2'];
end;
pero no sé continuar... ni he visto por ahora algo que me ayude a seguir un paso más. Muchas gracias nuevamente, por vuestro interés!!!.

Última edición por ecfisa fecha: 12-02-2011 a las 00:15:02. Razón: ETIQUETAS DELPHI
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Campo Calculado!!! Ledian_Fdez OOP 1 03-10-2007 22:10:01
Crear Vista a tabla con campo calculado amadis SQL 3 18-09-2007 22:22:24
Pasar un campo calculado a un campo del mismo DbGrid maravert Conexión con bases de datos 3 12-05-2006 00:31:30
Campo de bd calculado davidgaldo MS SQL Server 3 20-05-2005 15:50:22
filtrar tabla por campo calculado aram2r Conexión con bases de datos 0 17-03-2005 18:53:59


La franja horaria es GMT +2. Ahora son las 14:37: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