Forum: Object-Pascal / Delphi-Language
Delphi
by Gehstock,
7. Mär 2011
wurde doch schon beantwortet
Danke nochmal euch allen
Forum: Object-Pascal / Delphi-Language
Delphi
by Gehstock,
7. Mär 2011
Das ist auch etwas verwirrend
DWORD fix(unsigned char *buffer,int length)
...
for (a = ~a & 0x3FFFFFFF; b >= 8; b -= 8, buffer++)
{
if (b==0x5*8)
b=0x5*8;
a = table^ (a << 8);
Forum: Object-Pascal / Delphi-Language
Delphi
by Gehstock,
6. Mär 2011
Danke ihr beiden,
Assarbad hat recht ist ein PAnsiChar
und wie übersetz ich das
if ( ((a ^ data) & (1L << 29)) != 0 )
var
ll : LongInt;
if not((a Xor data) and (SizeOf(ll) SHL 29)) = 0 then
Forum: Object-Pascal / Delphi-Language
Delphi
by Gehstock,
6. Mär 2011
wie würdet ihr die Folgende Zeile Übersetzen mich verwirrt sie etwas
for (b = ~b & 0x3FFFFFFF; a >= 8; a -= 8, buffer++)