Delphi Kann mir jemand diesen C++ Code in Delphi umwandeln?

Thema durchsuchen

Ansicht

Themen-Optionen

Kann mir jemand diesen C++ Code in Delphi umwandeln?

Ein Thema von Pseudemys Nelsoni · begonnen am 12. Jan 2004 · letzter Beitrag vom 13. Jan 2004

Vorheriger Beitrag

Nächster Beitrag

scp

Registriert seit: 31. Okt 2003
1.120 Beiträge

Delphi 7 Personal

#17

Re: Kann mir jemand diesen C++ Code in Delphi umwandeln?

13. Jan 2004, 01:03

So, hab mal verglichen, warum alle anderen ausser den Gs (Qs) richtig sind.
Der Unterschied ist, das bei Ord(V[I]) bzw. Integer(V[I]) bei den falschen eine ungerade Zahl ist, das heisst es stimmt was bei der oberen Formel nicht.

Edit:
Habs raus, eine Klammer war zu viel:
W[I] := Encoding[ ( ( a shl (a and 1) and Ord(V[8-I]) ) and $3F )+1 ];