string tstrings pchar的相互转换.txt

来自「自己对DELPHI学习的一点体会」· 文本 代码 · 共 25 行

string TStrings pchar的相互转换 (2001年5月24日) 

本站更新  分类:算法   作者:  推荐:   阅读次数:189  
(http://www.codesky.net)  

--------------------------------------------------------------------------------
var
p:pchar;
s:string;
ss:tstrings;
begin
ss:=tstringlist.create; // 开始时一定不要忘记创建ss
ss.text:=s; // string --＞ tstrings
s:=ss.text; // tstrings --＞ string
p:=pchar(s); // string --＞ pchar
s:=p; // pchar --＞ string
showmessage(s); // 合法语句
showmessage(p); // 合法语句
... ...
ss.free; // 最后还要记着释放ss占用的资源
end;