Delphi中指针和地址切换的方法
指尖风暴 procedure TForm1.RzBitBtn1Click(Sender: TObject);
var
tpldate ,s: AnsiString; //ansistring
ptpl:PAnsiString; //指针类型，其实就是个内存地址
begin
s:= AnsiString('whoami'); //定义个ansistring
ptpl:=@s; //把ansi的指针地址给ptpl
tpldate:= ptpl^ ; //把ptpl地址对应的值给tpldate
ShowMessage(string(tpldate)); //把tptl弹出来
end;声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。
