function MyCrc32(Init: Cardinal; const Buf; iLen: Integer): Cardinal; assembler;
asm
// eax = Init; edx = @Buf; ecx = InLen
or ecx, ecx
jle @@return
push esi
mov esi, edx
xor edx, edx
@@loop:
lodsb
mov dl, al
shr eax, 8
xor eax, dword ptr [CRC32Table + edx * 4] // 可能这句编译不过去
dec ecx
jnz @@loop
@@done:
pop ebx
@@return:
end;