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;

相关阅读 >>

Delphi 木马配置器通用写法(末尾追加数据的方法)

Delphi xe8 androdi利用httpclient实现的一个app自动更新组件

Delphi d10.x 并行库ppl编程之 tparallel.for

Delphi Delphi中点击dbgrid某一行获得其详细数据方法

Delphi webbrowser设置自己定义user-agent

Delphi mailurlmaybeinvalid 检测邮箱地址有效性

Delphi 把exe可执行文件等作为资源包含在Delphi编译文件中

Delphi如何检测form的移动和调整尺寸事件

Delphi inputquery

Delphi 根据文本高度确定richedit高度

更多相关阅读请进入《Delphi》频道 >>