[gR@y]

Есть в delphi аналог strtok ????
у меня строка в которой слова разделены пробелами, мне надо получить эти слова и обработать... Как мне выделить слова в строке ????
Можите кинуть примерчик кода ????

[Gad99]

А можно по подробнее что это за strtok???
Наверно вам нужно это
VAR
X : string; текстовая переменная
x1 : array [1..10] of string; массив слов
i, c : integer; для цикла
BEGIN
c := 1;
For i := 1 to length(x) do If x[i] <> ' ' Then x1[c] := x1[c] + x[i]
Else Begin
c:= c + 1;
i := i + 1;
End;
End;

Как то так.
Прим. Массив слов лучше сделать динамический, могут быть скрыты ошибки, я немного под градусом :-) Всех с праздником