Ich probier nicht über die 2000 / 3000 Zeilen zu kommen. Bei manchen Klassen lässt es sich aber nicht verhindern. Allein Properties und Getter und Setter erzeugen ja haufenweise Zeilen. Delphi ist nun mal nicht die kompakteste Sprache.
Naja, für Getter und Setter benötigst du aber eigentlich immer zwei Methoden, egal in welcher Sprache
-> Funktionskopf + begin + Anweisungen + end; brauchen eben mal mindestens 4 Zeilen wenn man es standardmäßig formatiert