title: How do I split a long string into "wrapped" strings?
body: <p>How to perform this in Delphi?</p>
  
  <p>I have a very long string.
  I need to wrap sting every 5 letters and add a dot in the end of wrapped string.</p>
  
  <p>Example string: </p>
  
  <pre><code>ssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
  </code></pre>
  
  <p>Result: </p>
  
  <pre><code>sssss. 
  sssss. 
  sssss. 
  sssss.
  </code></pre>