
<div dir="ltr"><div class="gmail_extra"><div class="gmail_quote">2013/11/18 John Landmesser <span dir="ltr"><<a href="mailto:JohnML@online.de" target="_blank">JohnML@online.de</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">


<div class="im">On 18.11.2013 13:11, Frederic Da Vitoria wrote:<br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

procedure DatesToAge (Date1, Date2: TDate ; out Years, Months, Days: integer);<br>

var<br>

</blockquote>

<br></div>

Hi Frederic,<br>

<br>

your code works as aspected!<br>

<br>

Perhaps it's more "usual" if you change the "out" Parameters to word?<br></blockquote></div><br></div><div class="gmail_extra">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.<br>


</div><div class="gmail_extra"><br>-- <br>Frederic Da Vitoria<br>(davitof)<br><br>Membre de l'April - Ť promouvoir et défendre le logiciel libre ť - <a href="http://www.april.org" target="_blank">http://www.april.org</a><br>


</div></div>