CRCCalc(CRC_32CCITT, '123456789', 9)
ergibt korrekter Weise $CBF43926.
Delphi-Quellcode:
FS := TFileStream.Create('c:\test.txt', fmOpenRead);
try
WriteLn(IntToHex(CRCCalcEx(CRC_32CCITT, FS.Read), 8));
finally
FS.Free;
end;
ergibt ebenfalls $CBF43926 wenn die Datei wirklich nur 123456789 enthält.
Gruß Hagen