Porting to Lazarus complete and code cleanup.
Converted to Lazarus.
Cleaned code.
Converted to Lazarus