Alleine dieses Konstrukt schreit doch nach Fehlermeldungen:
Delphi-Quellcode:
for h:=1 to length(s) do
Code[h]:=Ord(passwort[h]);
1) aus welcher dunklen Ecke kommt Code gekrochen?
2) wenn h von der Länge von s abhängig ist, dann muß passwort mindestens so lang wie s sein, sonst rappelt es im Karton.
Und wenn es nicht rappelt (Fehlermeldungen abgeschaltet?) dann läuft wieder einmal ein Programm Amok und es tauchen vollkommen unerklärliche Fehler auf.
Gruß
K-H