摘要：
TypeTMyRec = record {定义结构} name: string[8]; age : Word;end;PMyRec = ^TMyRec; {定义结构指针; Delphi 一般把它定义在结构前面, 都可以}{如果使用结构指针}procedure TForm1.Button2Click(Sender: TObject);varpr: PMyRec;beginNew(pr); {分配内存}pr^.name := '张三';pr^.age := 99;ShowMessage(Format('%s %d 岁', [pr^.name, pr^.age])); 阅读全文
