Probleme mit CRC CCITT Prüfsumme

[sx2008]

Ändere mal die Deklaration deiner Funktion wie folgt:

Delphi-Quellcode:

// AnsiString (8 Byte pro Zeichen)
Function GenerateCRC16(const s1:AnsiString):Word;

Ich habe auch den Namen der Klasse TForm1 weggelassen, denn es handelt sich ja
um eine ganz gewöhnliche Funktion, die unabhängig vom Formular ist.