Zumindest bei kleinen Files bringt LSHA1.Update(LFile.Memory^, LFile.Size)
das richtige Ergebnis. Kann aber Zufall sein, daß die Größe paßt, also besser mit Original-Filegröße.
Wahrscheinlich wird alles kleiner als
BUFFERSIZE = 4 * 1024;
Bytes funktionieren.
Wer die Konstante in der Tokyo-System.Hash-
Unit findet, darf sie behalten.