Главная страница
    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.034 c
3-1116232915
Dimedrol
2005-05-16 12:41
2005.06.29
Замена транзакций в MSSQL (part 2)


14-1117391999
Layner
2005-05-29 22:39
2005.06.29
Свой макроязык


4-1115042621
Rambo
2005-05-02 18:03
2005.06.29
Права доступа


14-1117519011
Иксик
2005-05-31 09:56
2005.06.29
У меня сегодня праздник :)


3-1116402505
SLP
2005-05-18 11:48
2005.06.29
копирование результатов запроса в буфер обмена





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский