delphi中实现指针偏移？

请问在delphi中如何实现指针偏移？  
  如下例（VC++）：  
  BYTE   *lpData;  
  lpData=lpdata+40;  
   
  答：  
  lpData:   ^byte  
   
  lpData   :=   Pointer(LongWord(lpData)   +   40);  

  或者：p2 := Ptr(Integer(p2) + 1);

 

 

  function endianCast(value : word) : word;
  type
    TByteBuf = array[0..1] of byte;
    TArray = ^TByteBuf;
  var
    p : ^TByteBuf;
    buffer1,buffer2 : array[0..1] of byte;
    ret : word;
  begin
    p := @buffer1;
    p[0] := 120;

    
  在问一个问题：  
  在下面的写文件中（delphi）,"THEBITMAP"表示什么意思？  
   
  答：  
  "THEBITMAP"是应用程序中某个资源的名字，你用ImageEditor可以打开  
  和应用程序同名的.res文件，里面就可以看到该字符串  
  （ImageEditor应该知道吧）