llenar campo calculado en ejecucion

[cloayza]

Para asignar valor a un campo calculado debes utilizar el evento OnCalcFields del TTable o TQuery...

Aqui un ejemplo de como calcular el valor...

Código Delphi [-]
{
VALOR_1 ->Campo de la Tabla...
VALOR_2 -> Campo de la TABLA

VALOR_3 ->Campo calculado...

}

procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
       {Forma 1}
      Dataset['VALOR_3']:=Dataset['VALOR_1'] + Dataset['VALOR_2'];

      {Forma 2}
      Table1.FieldByName('VALOR_3').AsInteger:=Table1.FieldByName('VALOR_1').AsInteger+Table1.FieldByName(  'VALOR_2').AsInteger;
end;

Saludos...