My solution would be:
IntLo := Integer(Value and $FFFFFFFF);
IntHi := Integer((Value shr 32) and $FFFFFFFF);
But I'm not sure this is the fastest solution.
*Edit: I realised that there is no need for and-ing:
IntLo := Integer(Value);
IntHi := Integer(Value shr 32);
IntLo := Int64Rec(X).Lo; IntHi := Int64Rec(X).Hi
is neater (but of typeCardinal
).