本文整理自网络,侵删。
procedure TForm1.RzBitBtn1Click(Sender: TObject);vartpldate ,s: AnsiString; //ansistringptpl:PAnsiString; //指针类型,其实就是个内存地址begins:= AnsiString('whoami'); //定义个ansistringptpl:=@s; //把ansi的指针地址给ptpltpldate:= ptpl^ ; //把ptpl地址对应的值给tpldateShowMessage(string(tpldate)); //把tptl弹出来end;
相关阅读 >>
Delphi d10.x 并行库ppl编程之 futures
Delphi tfilestream和tmemorystream分别读取、创建、合并文件
Delphi xe android的所有权限按照分类总结说明
更多相关阅读请进入《Delphi》频道 >>