Integer in String(in Worten) konvertieren

[delphi10]

Hallo

Ich wollte mal die Integerwerte 0-99 in ausgeschriebene Worte konvertieren. Es gibt zwar die eine oder andere Lösung zu finden, aber das war mir alles zu aufwändig. Wer sich dafür interessiert, guckt mal hier:-
Eine Erweiterung bis 999 habe ich mir gespart, weil nicht benötigt. Sollte aber leicht zu implementieren sein. Vielleicht schreibt mal jemand, wie blöd ich mich dabei angestellt habe.
Gruß delphi10