Fale, haces doble click en TTable (TIBTable, TQuery, etc) , add field, indicas el tipo de campo y le dices que es calculado.
habres el evento OnCalcField
TTable ->Events ->OnCalcField
void __fastcall TForm1::Table1CalcFields(TDataSet *DataSet)
{
DataSet ->FieldByName("MIFECHA") ->AsDateTime =
DataSet ->FieldByName("DESDEFECHA") ->AsDateTime
-
DataSet ->FieldByName("HASTAFECHA") ->AsDateTime;
}
Prueba las funciones diftime, encodetime, etc.
|