nochmal DEC: Hash wird nicht in Stream geschrieben ???

[Predator]

so ich hab das jetzt bissel umgeändert: sieht jetzt so aus:
nach dem fs.Read hab ich noch:

result := FileHeader.FileHashString; eingefügt und beim aufruf:

FileHeader.FileHashString := ReadFileHeader(Edit1.Text, FileHeader);

jetzt hab ich noch irgendwie ein Logikfehler drin. Von was mus ich den Hash haben ? Ich hab den von einer Datei generieren lassen. Diesn speicher ich in der Datei als Prüfsumme. Beim entschlüsseln generiere ich von der verschl. Datei einen Hash Wert und überprüfe ob bei de gleich sind.

Diese sind aber immer anders. Muss ich vom Passwort ein Hash speichern oder wie geht das ?

danke.