Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.20;
Скачать: CL | DM;

Вниз

Работа со строками   Найти похожие ветки 

 
Maxman   (2002-05-06 12:32) [0]

Напомнитепожалуйста функцию которая бы изстроки "12.22.1.44.6"
сделала бы строки "12" "22" "1" "44" "6" (разделитель "." илилюбоедругое).


 
Виктор Щербаков ©   (2002-05-06 12:38) [1]

Лень самому писать - поищи.
http://delphibase.endimus.com/?action=viewfunc&topic=strsearch&index=3


 
Кулюкин Олег ©   (2002-05-06 12:40) [2]

Можно написать самому, использую функции WordCount, ExtractWord из RXLib, модуль StrUtils.


 
Song ©   (2002-05-06 12:43) [3]

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;


 
Maxman   (2002-05-06 13:22) [4]

Всем большое спасибо. Особенно Song © (06.05.02 12:43), за оригинальное решение! :-)


 
Андрей Сенченко ©   (2002-05-06 13:26) [5]

Как раз это ( Song © ) - стандартное решение. Как показывает практика, одно из самых медленных.

В архивах форума пошукай если есть желание - Там есть очень интересная ветка по поводу работы с бейсик-строкой


 
Ivanov Sergey   (2002-05-06 20:17) [6]

StrUtils->ExtractWord(Number,Input,[" ","+","-","*","/","\"])


 
VID ©   (2002-05-06 22:31) [7]

UBPFD: http://delphibase.endimus.com/?action=viewfunc&topic=strconvert&index=5
или
UBPFD: http://delphibase.endimus.com/?action=viewfunc&topic=strconvert&index=4



Страницы: 1 вся ветка

Текущий архив: 2002.05.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.01 c
14-64824
Malder
2002-04-10 21:36
2002.05.20
Модераторам...


1-64706
dzmitry
2002-05-02 12:53
2002.05.20
TListView


1-64696
Kekc
2002-05-04 22:04
2002.05.20
Сравнение TBitmap


1-64604
hoaxer
2002-05-06 16:58
2002.05.20
TGA с альфа каналом


1-64600
LVG
2002-05-07 20:01
2002.05.20
обратный отсчёт времени