请教如何将以下c语句转成delphi语句：

Question

EvalPtr:=ValList[9,0]-FeaturePos[0]+FeaturePos[2];
^Hor2Ptr2:=Hor2Ptr1[Index1];
Eval:=ValPtr[Index1];

Answer 1

EvalPtr: = ValList[9,0] - FeaturePos[0] + FeaturePos[2];  
^Hor2Ptr2: = ^Hor2Ptr1[Index1];
Eval: = ValPtr[Index1];  

Answer 2

基本代码类似如下，没有调试，你看一下吧。
type 
   PHOR2_INFO=^HOR2_INFO;
   HOR2_INFO = record
       XSequares:integer;
       Corner1:Shortint;
       Corner2:Shortint;
   end;
   pSChar=^schar;
   schar=char;
   
var
   EvalPtr:pSChar;
   ValList:Array[0..60,0..9] of pSChar;
   FeaturePos:Array[0..9] of integer;
   Hor2Ptr1,Hor2Ptr2:PHOR2_INFO;
   Eval,Index1:integer;
   ValPtr:pSChar;EvalPtr:=ValList[9,0]-FeaturePos[0]+FeaturePos[2];
Hor2Ptr2:=Hor2Ptr1[index1];
Eval:=ValPtr[Index1];

Answer 3

不能这样操作吧，EvalPtr:=ValList[9,0]-FeaturePos[0]+FeaturePos[2];指针与整形一起操作？还有其它的语句也是