指针类型

指针声明

Type 
  TmingRi=^integer;
var
  s1.s2:^string;
  s3:string;
begin
  new(s1);
  new(s2);
  s1^:='MingRiSoft';
  s2^:='kaihongliu';
  s1:=s2;            //指针赋值给指针,更换钥齿
  s2^:='Welcome You !';
  s3:='New Memory';
  s2:=@s3;           //获得变量的指针
                     //指针赋值给指针,更换钥齿
  s1^:=s2^:          //更换柜子里的东西
  s3:='Is right';
end;

posted @ 2023-02-16 22:05  德琪  阅读(20)  评论(0)    收藏  举报