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] 展开
我用CopyMemory(@data[j], @TmpStr[1], Length(TmpStr));
时,要取出data[i]就是不会,哪位好心人帮我解决一下好不好?
就是我想读出data[1] 展开
2个回答
展开全部
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;
var
data:TStrings;
begin
data := TStringList.Create;
data.CommaText := '12 34 56';
// 此时data[0]='12' data[1]='34' data[2]='56'
end;
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
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;
如: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;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询