|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
аналог strtok в delphi
Есть в delphi аналог strtok ????
у меня строка в которой слова разделены пробелами, мне надо получить эти слова и обработать... Как мне выделить слова в строке ???? Можите кинуть примерчик кода ???? |
#2
|
|||
|
|||
А можно по подробнее что это за 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; Как то так. Прим. Массив слов лучше сделать динамический, могут быть скрыты ошибки, я немного под градусом :-) Всех с праздником |