Unable to invoke Code Completion due to errors in source cod

[Dax]

Ich weiss nicht, welcher Spracher dieser Code zuzuordnen ist, aber auf jeden Fall ist es nicht Delphi.

Es gibt keine Sets von Strings, also ist die "nummer = ..."-Zeile schon mal komplett falsch.
In eine record-Deklaration kommt kein "of".
Auf Chars innerhalb eines Strings greift man mit str[idx] zu, nicht str(idx).