Delphi字符串到指针

请问谁可以帮我解决这个问题啊?比如对于字符串123456,我希望可以得到一维数组data[1..3],使data[1]=12....我用CopyMemory(@data[... 请问谁可以帮我解决这个问题啊?比如对于字符串12 34 56,我希望可以得到一维数组data[1..3],使data[1]=12....
我用CopyMemory(@data[j], @TmpStr[1], Length(TmpStr));
时,要取出data[i]就是不会,哪位好心人帮我解决一下好不好?
就是我想读出data[1]
展开
 我来答
叮当猫武汉
2010-05-05 · TA获得超过3739个赞
知道大有可为答主
回答量:744
采纳率:0%
帮助的人:0
展开全部
procedure TForm1.Button1Click(Sender:TObject);
var
data:TStrings;
begin
data := TStringList.Create;
data.CommaText := '12 34 56';
// 此时data[0]='12' data[1]='34' data[2]='56'
end;
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
zjgzfs
2010-05-05 · TA获得超过428个赞
知道小有建树答主
回答量:380
采纳率:0%
帮助的人:482万
展开全部
Delphi 中长字符串(string类型)可以当字符数组使用。
如:s:='123456' ,则s[1]中为字符'1'、s[2]中为字符'2'、s[3]中为字符'3'、。。。。

所以,可以用一个循环实现你的要求:
var
data:array of integer;
s:string;
i:integer;
begin
s:='123456';
setlength(data,length(s));
for i:=1 to length(s) div 2 do
data[i]:=strtoint(s[2*i-1]+s[2*i]);
end;
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 2条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式