VBA Script in Delphi umsetzen

[himitsu]

Zitat von BUllweih:

Das Lustigste ist das es immer noch nicht geht.

Es gibt ein Problem in der Berechnung der Tabelle und vermutlich das gleiche "Problem" gibt es auch in der CRC-Berechnung.

Meine Vermutlung liegt, erfahrungsgemäß, bei der Vorzeichenbehandlung.

Die Berechnungen selber liesen sich ja "leicht" übersetzen, aber dann müssen hier auch vergleichbare Typen (Anzahl der Bits, mit oder ohne Vorzeichen) und vergleichbare Rechenoperationen vorhanden sein.

ShortInt($FF aka -1) div 2 = $00 (0)
Byte($FF aka 255) div 2 = $7F (127)

ShortInt($F0 aka -16) div 2 = $F8 (-8)
Byte($F0 aka 240) div 2 = $78 (120)




Hex(123456789, 8); liefert in delphi und VB auch das selbe Ergebnis?