Ähhhh...
Ganz ehrlich? DIE
Unit ist mehr als ein schlechtes Beispiel.
So einen Code würde ich nie, gar nie nicht im real life abliefern. Das war ein Hochschulprojekt (eigentlich in C++ mit dem BCB6), für das ich eine Delphi-basierte Komponente gebaut habe, die im Prinzip NUR das tut, was wir für das Ding gebraucht haben. Das war seeeehr quick und seeeehr Dirty