DELPHI 中位操作(bitwise)的有关问题

DELPHI 中位操作(bitwise)的问题
声明了一个Int64类型的变量，最后想将该变量的高32位赋值为0，然后将低32的值赋给一个DWORD类型的变量。
应该如何处理？
比如：
var
  t: Int64; 
begin
  ...

  //将t的高32设置为0
  t := (t and ?);
  ...
end; DELPHI? bitwise
[解决办法]
左移 shl 
右移 shr  

var
 t:int64;
begin
 t:=hight(int64);//$7FFFFFFFFFFFFFFF
 t:=t shr 32; //$00000000FFFFFFFF 
。。。。

注意符号位
[解决办法]