Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.06.29;
Скачать: 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 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.061 c
1-1117729758
byte1
2005-06-02 20:29
2005.06.29
StringGrid


14-1117904770
Qwertyk
2005-06-04 21:06
2005.06.29
Модем - Телефон


3-1116480288
dreamse
2005-05-19 09:24
2005.06.29
Как узнать какие базы есть на сервере MSSQL ?


14-1115242958
i-s-v
2005-05-05 01:42
2005.06.29
SMS


14-1116571476
CHES
2005-05-20 10:44
2005.06.29
Хочу поюзать, что пишет ЮЗ 2