C++ Builder 6, ввод массива

[XyMan]

Помогите пожалуйста, надо из поля Edit взять массив(int). Числа записаны через пробел. Может есть такая функция, которая сразу записывает?

[Sazary]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString buf,s;
int i,k=0,mas[10];
s = Edit1->Text;
for(i=1,buf="";i<=s.Length()+1;i++)
 {
  if(i==s.Length()+1)
   {
    mas[k++] = StrToInt(buf);
    break;
   }
  if(s[i]==' ')
   {
    mas[k++] = StrToInt(buf);
    buf = "";
   }
  buf += s[i];
 }

for(i=0;i<k;i++)
 ShowMessage(IntToStr(mas[i]));
}

[XyMan]

Спасибо огромное!