String如何转换成PChar? S : String;PChar(S)总是警告不安全,还有别的好办法吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我不是很清楚。PCHAR类型。用得不多 用PChar(S)就行啦,不安全的警告的意思是说这样写不能被移植到Delphi8.NET上去 如s := '0123456'PChar1:= s[0] // PChar1='0';PChar1:= s[1] // PChar1='1';//明白否? 不明白,我需要把整个字符串转换成PChar类型。 没有警告啊!我用的delphi6 !^^var s:sting; a:pChar;begin s:='dafsasdas'; a:=pChar(s); edit1.Text:=a;end; delphi7就有了,据说delphi8都通不过 手动拷贝一个for i:=1 to length(str) do ... var pszstr:PChar; s:string;begin s:='12345'; GetMem(pszstr,100); StrPCopy(pszstr,s); FreeMem(pszstr);end; ★★★升水星了★★★ 求多层结构下数据检索速度的提高方案! 请教一个关于TWebBrowser打开新窗口的问题 鼠标上得小小问题!可是我不知道该怎么查文档 在线等。 关于远程控制的一个问题 一个参数的问题很简单的但是我不会呀???————在线等待 怎么把chm文件和delphi文件结合起来 delphi坏了。看看是什么原因? 请问如何设置密码位数为固定的? 怎样设置打印纸的尺寸? 【Delphi版年度新人奖提名&投票专题贴】 ?help界面美化的方法及各方面??
不安全的警告的意思是说这样写不能被移植到Delphi8.NET上去
PChar1:= s[0] // PChar1='0';
PChar1:= s[1] // PChar1='1';
//明白否?
var
s:sting;
a:pChar;
begin
s:='dafsasdas';
a:=pChar(s);
edit1.Text:=a;
end;
for i:=1 to length(str) do
...
pszstr:PChar;
s:string;
begin
s:='12345';
GetMem(pszstr,100);
StrPCopy(pszstr,s);
FreeMem(pszstr);
end;