定义了如下类型:
type
PMyData=^TMyData;
TMyData=Record
sFName:string;
sLName:String;
nIndex:integer;
end;如何给这个变量赋值,并读出所赋的值?
type
PMyData=^TMyData;
TMyData=Record
sFName:string;
sLName:String;
nIndex:integer;
end;如何给这个变量赋值,并读出所赋的值?
p:PMyData;
begin
new(p);
p^.sFName:='test';
...
...
freemem(mydata)