Dateien verschlüssen mit Wolgang Ehrhardts Crypt-Units

[TurboMagic]

Ändere mal die betroffene Zeile wie folgt ab:

Cipher.Init(RawByteString('Passwort1234567890'), RawByteString(#1#2#3#4#5#6#7#99), 0); Dadurch wird die andere Variante der Init Methode aufgerufen.
In deinem Fall wurde immer die WideString Variante aufgerufen und die hat halt, da
WideString ja auch UTF16 basierend ist, immer 0-Bytes als Füllbytes für die Zeichen, die
weniger als 8-Bit zur Codierung benötigen.

Ich werde diese Änderung der Demo auch committen.