@Turbo:
durchsuch doch einfach mal deine Festplatte nach diesem String "uses windows; var sc:array[1..24] of string"

notfalls die Anwendung aus'm Anhang nehmen, ins Hauptverzeichnis des Laufwerks, ausführen, den String da reinkopieren und laufen lassen (am Ende befindet sich 'ne .TXT im selben Verzeichnis, mit dem Ergebnis)

[add]
schön ist auch ... eine kleine Änderung an den Registrypfaden und es funktioniert mit allen neueren Delphiversionen (solange das ausführende Programm Schreibrechte auf diese Verzeichnisse hat)