CRC32 mit DEC erzeugt stimmt nicht?

[himitsu]

hmmm, dann stimmt wohl etwas nicht


du weißt, daß Buf in diesem Fall ein UnicodeString ist?

Delphi-Quellcode:

const
  Buf = '123456789';

  result := IntToHex(CRCCalc(CRC_32CCITT, PAnsiChar(Buf)^, Length(Buf)), 4);

also ist Buf bei dir effektiv nur
Buf = AnsiString('1'#0'2'#0'3'#0'4'#0'5'); #wobei PAnsiChar und ein WideString nicht so gut passen und da sollte es eigentlich eine Meldung seitens Delphi geben


versuch mal

Delphi-Quellcode:

const
  Buf: AnsiString = '123456789';

  result := IntToHex(CRCCalc(CRC_32CCITT, PAnsiChar(Buf)^, Length(Buf)), 4);