[Lazarus] DateDif function needed

John Landmesser JohnML at online.de
Mon Nov 18 14:50:36 CET 2013

On 18.11.2013 13:11, Frederic Da Vitoria wrote:
> procedure DatesToAge (Date1, Date2: TDate ; out Years, Months, Days: 
> integer);
> var

Hi Frederic,

your code works as aspected!

Perhaps it's more "usual" if you change the "out" Parameters to word?!



More information about the Lazarus mailing list