有关提取数字画图（TCHART）的有关问题

有关提取数字画图（TCHART）的问题
我的程序如下，想实现从输入的数据中将数字提取出来，然后画图，运行时老出错说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;
  ...

[解决办法]
string下标，从1开始的