我的程序如下,想实现从输入的数据中将数字提取出来,然后画图,运行时老出错说raised exception class EconvertError wiht message ''var
k,h: integer;
str:string;
begin
str:='';
for k:=0 to length(mainform.mmsend.text)-1 do
if mainform.mmsend.text[k] in ['0'..'9'] then
str:=str+mainform.mmsend.text[k];
for h:=0 to length(str)-1 do
Series1.AddY(strtoint(str[h]),'',clYellow);
inc(t);
end;
...
k,h: integer;
str:string;
begin
str:='';
for k:=0 to length(mainform.mmsend.text)-1 do
if mainform.mmsend.text[k] in ['0'..'9'] then
str:=str+mainform.mmsend.text[k];
for h:=0 to length(str)-1 do
Series1.AddY(strtoint(str[h]),'',clYellow);
inc(t);
end;
...
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货