Вниз
Скачать: CL | DM;

Помогите разобрать строку, нужно взять только цифры с "конца"   Найти похожие ветки 

 
mmms   (2005-06-01 10:01) [0]

Строка 52/552/554-552/999, нужно скопировать только 999, Pos & Copy и бесконечные переборы слеша, потом Delete после слеша не удобно, может как нибудь поудобнее можно сделать?
Заранее благодарю.


 
mmms   (2005-06-01 10:02) [1]

999 - и т.п. это цифра после последнего слеша, может быть и 2х значной, и 5ти значной..


 
Rule ©   (2005-06-01 10:10) [2]

чего, совсем не хочешь головой думать, а циклы зачем по твоему?


 
Mx ©   (2005-06-01 10:17) [3]

Delete(S, LastDelimiter("/", S), MaxInt);


 
mmms   (2005-06-01 10:31) [4]

Mx ©   (01.06.05 10:17)
LastDelimiter, это то что надо! Что лучше, код с циклом на 6-8 строк, и плюс несколько переменных, или 1 слово!!! Круто!! Благодарю!!


 
Antonn ©   (2005-06-01 10:32) [5]


> Что лучше, код с циклом на 6-8 строк, и плюс несколько
> переменных, или 1 слово!!!

это не просто слово, это функция, в которой и 6-8 строк и переменные...


 
Mx ©   (2005-06-01 10:35) [6]

В [3] я "инвертнул" результат. Чтоб получить 999 надо:
S := Copy(S, LastDelimiter("/", S) + 1, MaxInt);


 
Юрий Зотов ©   (2005-06-01 10:51) [7]

Еще вариант:
ExtractFileName(StringReplace(S, "/", "\", [rfReplaceAll]))


 
mmms   (2005-06-01 11:03) [8]

Юрий Зотов
Ух ты, через имя файла я тоже как то не додумался, хотя я не с файлами и директориями эту задачу решаю, а договора у нас типа этого пронумеровываются. Но да, действительно, и так можно воспользоваться.

Antonn ©   (01.06.05 10:32)
так Антон, в том и дело, что нет желания переписывать все встроенные ф-я в VCL. А то что есть какие то редкие, я догадывался но не знал. теперь вот буду знать :)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
1-1118249091
terra0
2005-06-08 20:44
2005.06.29
Динамические массивы


11-1101251566
XProger
2004-11-24 02:12
2005.06.29
Прокрутка в Memo


1-1118068564
WondeRu
2005-06-06 18:36
2005.06.29
Ошибка при очистке дерева объектов!


14-1117802975
*Oksana*
2005-06-03 16:49
2005.06.29
Проблема со шрифтом


10-1094645321
bSava
2004-09-08 16:08
2005.06.29
Кто запутил программу?




   Наверх