2013/11/18 John Landmesser <[email protected]>

> 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?
>

Yes, it would be more usual, but since you seem interested, I will try to
create a "signed version, which will of course return signed values.

-- 
Frederic Da Vitoria
(davitof)

Membre de l'April - « promouvoir et défendre le logiciel libre » -
http://www.april.org
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to