BugFix in regtype.pas
Beispiel erweitert