<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<table class="diff-table tab-size " data-tab-size="8">
<tbody>
<tr>
<td class="blob-code blob-code-deletion"><span
class="blob-code-inner">- FIncrement := AIncrement;</span>
</td>
</tr>
<tr>
</tr>
</tbody>
</table>
<table class="diff-table tab-size " data-tab-size="8">
<tbody>
<tr>
<td class="blob-code blob-code-addition"> <span
class="blob-code-inner">+ <span class="pl-k">if</span>
AIncrement > <span class="pl-c1">0</span> <span
class="pl-k">then</span></span> </td>
</tr>
<tr>
</tr>
</tbody>
</table>
<table class="diff-table tab-size " data-tab-size="8">
<tbody>
<tr>
<td class="blob-code blob-code-addition"> <span
class="blob-code-inner">+ FIncrement := AIncrement</span>
</td>
</tr>
<tr>
</tr>
</tbody>
</table>
<table class="diff-table tab-size " data-tab-size="8">
<tbody>
<tr>
<td class="blob-code blob-code-addition"> <span
class="blob-code-inner">+ <span class="pl-k">else</span></span>
</td>
</tr>
<tr>
</tr>
</tbody>
</table>
<table class="diff-table tab-size " data-tab-size="8">
<tbody>
<tr>
<td class="blob-code blob-code-addition"> <span
class="blob-code-inner">+ FIncrement := -AIncrement;</span>
</td>
</tr>
<tr>
</tr>
</tbody>
</table>
<br>
<span class="blob-code-inner">better: FIncrement := Abs(AIncrement);<br>
</span>
<pre class="moz-signature" cols="72">--
Regards,
Alexey</pre>
</body>
</html>