The code in this example was converted from Delphi as a learning exercise. The original code was written by Jeff Dunteman published in his book, Delphi Programming Explorer.