CPP -> Delphi

[Gehstock]

Danke ihr beiden,
Assarbad hat recht ist ein PAnsiChar
und wie übersetz ich das

Code:

if ( ((a ^ data) & (1L << 29)) != 0 )

Delphi-Quellcode:

var
ll : LongInt;

if not((a Xor data) and (SizeOf(ll) SHL 29)) = 0 then

so in etwa?