看一看30分值不值得？

Question

Type 
  TPamaB=^TParamA;
  TParamA=Record
    X:Integer;
    Y:Integer;
  end;
正确写法，TParamA是一个结构，TParamB是指向这个结构的指针。用法（一般在NEW函数）
Var
  Param:TParamB;
Begin
  New(Param);
  Param^.X :=12;
  Param^.Y :=10;//就这样用
end;
  

Answer 1

^不是很形象吗？比如说有一个类型integer，则^integer就是指向整型的指针类型。比如有一个变量pI它的类型是^integer，则pI^就是它指向的整型的数值。另外，@用来取地址，恒有关系(@X)^=X, @(X^)=X。type
  I: integer;
  pI: ^integer;pI := @I; // now pointer pI has address of I
pI^ := pI^ + 1; // now I increases by 1当然如果事先没有I的存在，则指针只是指针，没有内存分配，要用GetMem等函数为其目标分配内存，最后还要FreeMem。