Keiner

Ich spreche nicht für alle, nur für mich. Aber auch ich glaube Dir

Unabhängig davon.
Ich habe als einfach mal Delphi 3 Professional gestartet, welches ja auch Deine Version ist, zumindest lt. Deinem Profil, Hagens Code hineinkopiert und kompiliert.
Es gab einen Fehler, da Delphi 3 den Typen
LongWord nicht kennt, diesen kann man aber mit
DWORD ersetzen und los gehts.
Code:
Ergebnis für "1234": 0 (absolut unbrauchbares Passwort"
Ergebnis für "QMAAX!gu*v": 0,309258685021519 (schon besser)
Ergebnis für "üE2.=m>KJh°^": 0,418247909543705 (recht gut)
Anbei das D3P Beispiel als Download. Und: der Code geht
...

...