[lmikle]

там нужен цикл While:

Код:

While Pos(' ',MySytring) > 0 Do
Begin
  // Здесь выцепляешь и обрабатываешь слово из строки MyString.
End;