<div dir="ltr"><div>Hi John,</div><div><br></div>You forgot to add that each function needs to have unit tests. Otherwise it is called legacy code.<div><br></div><div>I really like C# which you can split multiple functions of the same class into separate files. I have seen some delphi unit has thousands of lines which act like a big stop sign to say stop maintaining the code. :-)</div><div><br></div><div>If I read a function which only have less than 5 lines of code with little parameters, it is so comfortable to maintain it. :-)</div><div><br></div><div>Regards</div><div>Leigh</div></div><div class="gmail_extra"><br><div class="gmail_quote">On 4 December 2014 at 17:58, John C <span dir="ltr"><<a href="mailto:jc@sunshinesoftware.co.nz" target="_blank">jc@sunshinesoftware.co.nz</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div lang="EN-NZ" link="blue" vlink="purple">
<div>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">Hi Leigh<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d"><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">A rewrite could be a major and very costly job. The readability
of your source depends very much on how it has been written. As you (should) know,
it helps (and also yourself!!) when using:<u></u><u></u></span></p>
<p style="margin-left:39.0pt"><u></u><span style="font-size:11.0pt;font-family:Symbol;color:#17365d"><span>·<span style="font:7.0pt "Times New Roman"">
</span></span></span><u></u><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">adequate notes in the source<u></u><u></u></span></p>
<p style="margin-left:39.0pt"><u></u><span style="font-size:11.0pt;font-family:Symbol;color:#17365d"><span>·<span style="font:7.0pt "Times New Roman"">
</span></span></span><u></u><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">having the program divided in multiple functional modules<u></u><u></u></span></p>
<p style="margin-left:39.0pt"><u></u><span style="font-size:11.0pt;font-family:Symbol;color:#17365d"><span>·<span style="font:7.0pt "Times New Roman"">
</span></span></span><u></u><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">using multiple feature related function libraries<u></u><u></u></span></p>
<p style="margin-left:39.0pt"><u></u><span style="font-size:11.0pt;font-family:Symbol;color:#17365d"><span>·<span style="font:7.0pt "Times New Roman"">
</span></span></span><u></u><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">etc.<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d"><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">When not using this method (or better) you may find yourself struggling
maintaining your own program ;)<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d"><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d">John<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d"><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif";color:#17365d"><u></u> <u></u></span></p>
<div style="border:none;border-top:solid #b5c4df 1.0pt;padding:3.0pt 0mm 0mm 0mm">
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma","sans-serif"">From:</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma","sans-serif""> <a href="mailto:delphi-bounces@listserver.123.net.nz" target="_blank">delphi-bounces@listserver.123.net.nz</a>
[mailto:<a href="mailto:delphi-bounces@listserver.123.net.nz" target="_blank">delphi-bounces@listserver.123.net.nz</a>] <b>On Behalf Of </b>Leigh
Wanstead<br>
<b>Sent:</b> Thursday, December 4, 2014 3:17 PM<span class=""><br>
<b>To:</b> NZ Borland Developers Group - Delphi List<br>
</span><span class=""><b>Subject:</b> Re: [DUG] Risk Management Plan<u></u><u></u></span></span></p>
</div>
<p class="MsoNormal"><u></u> <u></u></p>
<div>
<p class="MsoNormal">To be honest, it is not easy to maintain someone else's
code. Rewrite the source code will be easier than read someone else's code.<u></u><u></u></p>
<div>
<p class="MsoNormal"><u></u> <u></u></p>
</div>
<div>
<p class="MsoNormal">Regards<u></u><u></u></p>
</div>
<div>
<p class="MsoNormal">Leigh<u></u><u></u></p>
</div>
</div><div><div class="h5">
<div>
<p class="MsoNormal"><u></u> <u></u></p>
<div>
<p class="MsoNormal">On 4 December 2014 at 10:35, Cameron Hart <<a href="mailto:Cameron.Hart@flowsoftware.co.nz" target="_blank">Cameron.Hart@flowsoftware.co.nz</a>>
wrote:<u></u><u></u></p>
<div>
<div>
<p class="MsoNormal"><span style="color:#1f497d">Hi John</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d">You have had a lot of good answers but no one has yet
mentioned that the risk you are trying to manage is your clients risk, not your
own. It is their responsibility therefore and it would be usual for them
to “cover the cost of covering the risk”.</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d">If you attempt to cover all of your clients risks you
will be using your capital (or risking your assets) to support their business,
and you will struggle to grow your own business.</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d">Instead I suggest you put the responsibility back on the
client and ask them to sign up to a support plan with regular monthly payments
which can give you the confidence to employ another developer so their risk is
reduced. This is an investment by the client in you for their own
benefit.</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
<div>
<table border="0" cellpadding="0" width="700" style="width:525.0pt">
<tbody><tr style="height:26.25pt">
<td colspan="4" style="padding:0mm 0mm 0mm 0mm;height:26.25pt">
<p class="MsoNormal"><b><span style="font-family:"Trebuchet MS","sans-serif";color:#122029">Cameron Hart </span></b><u></u><u></u></p>
</td>
</tr>
<tr>
<td width="23" style="width:17.25pt;padding:0mm 0mm 0mm 0mm"></td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><b><span style="font-size:9.0pt;font-family:"Trebuchet MS","sans-serif";color:#92c75f">Flow
Software Limited </span></b><u></u><u></u></p>
</td>
<td width="5" rowspan="4" valign="bottom" style="width:3.75pt;padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="color:#1f497d"><img border="0" width="1" height="55" src="cid:image001.jpg@01D00FEB.E65696F0"></span><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm"></td>
<td style="padding:0mm 0mm 0mm 0mm"></td>
<td rowspan="4" style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="color:#1f497d"><img border="0" width="158" height="38" src="cid:image002.jpg@01D00FEB.E65696F0" alt="Flow"></span><u></u><u></u></p>
</td>
</tr>
<tr>
<td style="padding:0mm 0mm 0mm 0mm"></td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029">PO
Box 302 768, North Harbour </span><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><b><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#92c75f">P
</span></b><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029"><a href="tel:%2B64%209%20476%203569" target="_blank">+64 9 476 3569</a></span><u></u><u></u></p>
</td>
</tr>
<tr>
<td style="padding:0mm 0mm 0mm 0mm"></td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029">Auckland
0751, New Zealand </span><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><b><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#92c75f">M
</span></b><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029"><a href="tel:%2B64%2021%20222%203569" target="_blank">+64 21 222 3569</a> </span><u></u><u></u></p>
</td>
</tr>
<tr>
<td style="padding:0mm 0mm 0mm 0mm"></td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="color:#1f497d"><a href="http://www.flowsoftware.co.nz" target="_blank"><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029">www.flowsoftware.co.nz
</span></a></span><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><b><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#92c75f">E
</span></b><u></u><u></u></p>
</td>
<td style="padding:0mm 0mm 0mm 0mm">
<p class="MsoNormal"><span style="color:#1f497d"><a href="mailto:cameron.hart@flowsoftware.co.nz" target="_blank"><span style="font-size:8.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029">cameron.hart@flowsoftware.co.nz </span></a></span><u></u><u></u></p>
</td>
</tr>
</tbody></table>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
<table border="0" cellpadding="0" width="650" style="width:487.5pt">
<tbody><tr style="height:26.25pt">
<td style="padding:0mm 0mm 0mm 0mm;height:26.25pt">
<p class="MsoNormal"><span style="font-size:7.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029">This
message is intended for the addressee named above. It may contain privileged
or confidential information. If you are not the intended recipient of this
message you must not use, copy, distribute or disclose it to anyone. </span><u></u><u></u></p>
</td>
</tr>
</tbody></table>
<p class="MsoNormal"><span style="font-size:8.0pt;color:#92c75f"> </span><span style="color:#1f497d">
</span><span style="font-size:8.0pt;font-family:Webdings;color:#92c75f">P</span><span style="color:#1f497d"> </span><span style="font-size:7.0pt;font-family:"Trebuchet MS","sans-serif";color:#122029">Please consider the environment before printing this email</span><span style="color:#1f497d"> </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
</div>
<p class="MsoNormal"><span style="color:#1f497d"> </span><u></u><u></u></p>
<div>
<div style="border:none;border-top:solid #b5c4df 1.0pt;padding:3.0pt 0mm 0mm 0mm">
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma","sans-serif"">From:</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma","sans-serif""> <a href="mailto:delphi-bounces@listserver.123.net.nz" target="_blank">delphi-bounces@listserver.123.net.nz</a>
[mailto:<a href="mailto:delphi-bounces@listserver.123.net.nz" target="_blank">delphi-bounces@listserver.123.net.nz</a>]
<b>On Behalf Of </b>John C<br>
<b>Sent:</b> Wednesday, 3 December 2014 11:59 a.m.<br>
<b>To:</b> 'NZ Borland Developers Group - Delphi List'<br>
<b>Subject:</b> [DUG] Risk Management Plan</span><u></u><u></u></p>
</div>
</div>
<div>
<div>
<p class="MsoNormal"> <u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d">Hi all.</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d">One of my clients is expanding their business (thanks to
my software;-) and asked me about a Risk Management Plan in case I would
disappear, fair enough. </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d">Me, myself and I are only a small company (as many of you
might be too), so no in-house backup developers available. </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d">Has any of you any experience or ideas regarding a Risk
Management Plan for a one man band?</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d"> </span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d">Thanks</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d">John Sunshine</span><u></u><u></u></p>
<p class="MsoNormal"><span style="color:#17365d"> </span><u></u><u></u></p>
</div>
</div>
</div>
</div>
<p class="MsoNormal"><br>
_______________________________________________<br>
NZ Borland Developers Group - Delphi mailing list<br>
Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>
Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>
Unsubscribe: send an email to <a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a>
with Subject: unsubscribe<u></u><u></u></p>
</div>
<p class="MsoNormal"><u></u> <u></u></p>
</div>
</div></div></div>
</div>
<br>_______________________________________________<br>
NZ Borland Developers Group - Delphi mailing list<br>
Post: <a href="mailto:delphi@listserver.123.net.nz">delphi@listserver.123.net.nz</a><br>
Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>
Unsubscribe: send an email to <a href="mailto:delphi-request@listserver.123.net.nz">delphi-request@listserver.123.net.nz</a> with Subject: unsubscribe<br></blockquote></div><br></div>