如何释放record类型

Question

我定义了一个record类型，想把它释放掉，但我直接赋nil行不通，还有别的方法吗？

Answer 1

type
Prec = ^Trec;
Trec = packed record
    X: char;
    Y: char;
end;
procedure TForm1.Button1Click(Sender: TObject);
var p:prec;
begin
  GetMem(p,100);
  p^.X:='1';
  p^.Y:='4';
  showmessage(p^.X+p^.Y);
  freemem(p);
end;

Answer 2

需要释放吗？？没使用指针来使用这个record类型，系统应当是自己释放的吧！我定义成变量，
自己不需释放，使用指针，则需要释放指针