Calculo de anio
CADETILL UTILICE EL SIGUIENTE CODIGO :
procedure TModeloDatos.TblMuebleCalcFields(DataSet: TDataSet);
Var
D, M, AIni, AFin : Word;
Begin
DecodeDate(AFin, M, D, Date);
AIni:=ModeloDatos.TblMueble.FieldValues['Añocompra'];
ShowMessage('Diferencia de años : ' + IntToStr(AFin - AIni));
end;
PARA CALCULAR LOS ANOS TRANSCURRIDOS ENTRE EL AÑO DE COMPRA DE UN PRODUCTO Y EL ACTUAL Y ME DA EL SIGUIENTE ERROR:
[Error] ModDat.pas(104): Types of actual and formal var parameters must be identical
[Fatal Error] CStock.dpr(15): Could not compile used unit 'ModDat.pas'
Y NO SE COMO ARREGLARLO
Saludos, jrcosta75
__________________
Cita:
|
El servir es mejor que el recibir
|
|