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

Вниз

Поиск по регулярным выражениям   Найти похожие ветки 

 
Feldsher   (2007-08-06 08:08) [0]

Подскажите как в дельфи организовать простейший сабж.
требуется в большом отрывке текста найти все подстроки которые отвечают конкретному регулярному выражению и поместить их в отдельный массив строк.


 
MBo ©   (2007-08-06 08:26) [1]

найди библиотеку TRegExpr


 
Leonid Troyanovsky ©   (2007-08-06 09:48) [2]


> Feldsher   (06.08.07 08:08)  

> Подскажите как в дельфи организовать простейший сабж.

У VBScript ver 5.0 есть  RegExp object, например

Function RegExpTest(patrn, strng)
  Dim regEx, Match, Matches   " Create variable.
  Set regEx = New RegExp   " Create a regular expression.
  regEx.Pattern = patrn   " Set pattern.
  regEx.IgnoreCase = True   " Set case insensitivity.
  regEx.Global = True   " Set global applicability.
  Set Matches = regEx.Execute(strng)   " Execute search.
  For Each Match in Matches   " Iterate Matches collection.
     RetStr = RetStr & "Match found at position "
     RetStr = RetStr & Match.FirstIndex & ". Match Value is ""
     RetStr = RetStr & Match.Value & ""." & vbCRLF
  Next
  RegExpTest = RetStr
End Function

MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))

Подробности в msdn
http://msdn2.microsoft.com/en-us/library/yfy6y4h1.aspx

Как прикрутить сам VBScript к дельфи описано в статье Анатолия Тенцера
на сайте Анатолия Подгорецкого.

--
Regards, LVT.



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

Форум: "Начинающим";
Текущий архив: 2007.08.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.041 c
15-1185397599
Petr V. Abramov
2007-07-26 01:06
2007.08.26
кака отличить съедобный гриб от ядовитого?


9-1155485737
Kav
2006-08-13 20:15
2007.08.26
ODE составная геометрия


15-1185572042
UnknownMan
2007-07-28 01:34
2007.08.26
Компилятор Delphi 3


15-1185058346
Каникулы
2007-07-22 02:52
2007.08.26
Кто может объяснить кубические сплайны словами?


2-1185727193
mfender
2007-07-29 20:39
2007.08.26
TADOConnection. Запуск редактора строки подключения





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