Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.035 c
4-1115290216
DrFaust
2005-05-05 14:50
2005.06.29
События Windows


3-1116339331
MEV
2005-05-17 18:15
2005.06.29
Создать базу данных runtime через ADO


4-1115232394
Alpine
2005-05-04 22:46
2005.06.29
Программное нажатие левой кнопки мыши !


14-1117216490
sofs
2005-05-27 21:54
2005.06.29
порты


14-1117403483
Piter
2005-05-30 01:51
2005.06.29
Простенький HTTP-прокси





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский