Einzelnen Beitrag anzeigen

BUllweih

Registriert seit: 17. Jul 2007
Ort: Medard
17 Beiträge
 
Delphi XE7 Enterprise
 
#40

AW: VBA Script in Delphi umsetzen

  Alt 4. Dez 2013, 11:19
Ob/wie man VBScripts debuggen kann, weiß ich auch nicht,

aber das Rechenergebnis kann man hiermit testen
http://www.zorc.breitbandkatze.de/crc.html

So wie es aussieht, sollte es eine ganz normale CRC32-Implementierung werden, mit dem Polynom $4C11DB7, aber sie wurde im VBScript fehlerhaft implementiert.
Zumindestens wenn ich mir die ersten Ergebnisse des Delphi-Codes ansehe. Denn die Webseite liefert das selbe Ergebnis wie testuser->B9851374 .

Wenn das VBScript korrekt gewesen wäre, hätte man hier garnichts neuentwickeln müssen, da viele fertige CRC32-Funktionen für Delphi schon mit diesem Polynom arbeiten oder dieses öfters einstellbar ist.
Genau diese Hoffnung hatte ich ja am Anfang gehabt.
Dachte es sei eine ganz normale CRC32 Funktion, war aber Leider auf dem Holzweg.

Aber da diese Vermurkste Version schon in so vielen Panels verbaut ( Programmiert ) ist, muss ich wohl oder
übel das etwas andere Model in Delphi einbinden um nicht alles Plattformen updaten zu müssen. ( Was bei der Menge und Standorte nicht geht )

Also erst mal vielen Dank für die großartige Hilfe Eurer Seits.

MfG
Michael aka Bulli
Michael
Finde heraus was Du nicht gut kannst. Dann lass es bleiben.
  Mit Zitat antworten Zitat