delphi 字符串转入整型数组
varaa:array[0..5]ofinteger;str:string;有如下字符串：str:='123456';将这个字符串中的123456存入到aa这个整型数组中...
var
aa: array[0..5]of integer;
str:string;
有如下字符串：
str:='123456';
将这个字符串中的123456存入到aa这个整型数组中，这句代码怎么弄呀？？谢谢！ 展开
aa: array[0..5]of integer;
str:string;
有如下字符串：
str:='123456';
将这个字符串中的123456存入到aa这个整型数组中，这句代码怎么弄呀？？谢谢！ 展开
展开全部
procedure TForm1.Button1Click(Sender: TObject);
var
aa: array[0..5]of integer;
str:string;
i:Integer;
begin
str:='123456';
for i:=0 to 5 do
begin
aa[i]:= ord(str[i])-ord('0');
end;
end;
var
aa: array[0..5]of integer;
str:string;
i:Integer;
begin
str:='123456';
for i:=0 to 5 do
begin
aa[i]:= ord(str[i])-ord('0');
end;
end;
更多追问追答
追问
请教一下：ord(str[i])-ord('0')
为什么还要相减？？你的思路是：用ascii码来搭桥进行转换吗？？
追答
这个肯定的。。必须。。滴 c/c++里就是这么搞滴
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
