Gut, ein guter Grund ist das nicht, aber versuch mal
TEncoding.
oder andere Klassen und ägere dich über die Vorschläge, der Private/Protected-Dinger. (in älteren Delphis)
Hat auch Jahre gebraucht, das auszubauen/reparieren.
PS: eine Variable "Test", statt der Klasse, wäre auch eine Lösung gewesen.