![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа со строками [D5]
Maxman © (2002-05-06 12:32:00)Напомнитепожалуйста функцию которая бы изстроки "12.22.1.44.6"
сделала бы строки "12" "22" "1" "44" "6" (разделитель "." илилюбоедругое).
VID (2002-05-06 22:31:00) [1]UBPFD: http://delphibase.endimus.com/?action=viewfunc&topic=strconvert&index=5
или
UBPFD: http://delphibase.endimus.com/?action=viewfunc&topic=strconvert&index=4
Ivanov Sergey (2002-05-06 20:17:00) [2]StrUtils->ExtractWord(Number,Input,[" ","+","-","*","/","\"])
Андрей Сенченко (2002-05-06 13:26:00) [3]Как раз это ( Song © ) - стандартное решение. Как показывает практика, одно из самых медленных.
В архивах форума пошукай если есть желание - Там есть очень интересная ветка по поводу работы с бейсик-строкой
Maxman (2002-05-06 13:22:00) [4]Всем большое спасибо. Особенно Song © (06.05.02 12:43), за оригинальное решение! :-)
Song (2002-05-06 12:43:00) [5]With TStringList.Create Do
try
Text:="12.22.1.44.6";
Text:=StringReplace(Text,".",#13#10,[rfReplaceAll]);
For t:=0 to Count-1 Do ShowMessage(Strings[t]);
finally
Free;
end;
Кулюкин Олег (2002-05-06 12:40:00) [6]Можно написать самому, использую функции WordCount, ExtractWord из RXLib, модуль StrUtils.
Виктор Щербаков (2002-05-06 12:38:00) [7]Лень самому писать - поищи.
http://delphibase.endimus.com/?action=viewfunc&topic=strsearch&index=3