[z668]

Добрый день.

Как использовать в RAD Studio XE3 перл образные регулярки? Я только начинаю изучать Delphi, документация по сравнению с PHP очень скудная, многочасовые поиски вывели на http://docwiki.embarcadero.com/Libra...ore.TPerlRegEx но ума не приложу как использовать в коде. Примеров использования (как например в мануалах по php нет).

Спасибо.

[PhoeniX]

А вы понимаете, зачем вам это вообще надо? Просто, если это понятно, то и вопросов "а как это использовать" не возникает. Не забывайте, что сначала должна быть идея, потом алгоритм, и уже потом - реализация

[z668]

Сообщение от PhoeniX

А вы понимаете, зачем вам это вообще надо? Просто, если это понятно, то и вопросов "а как это использовать" не возникает. Не забывайте, что сначала должна быть идея, потом алгоритм, и уже потом - реализация

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

[PhoeniX]

Зачем составлять то?

[z668]

Сообщение от PhoeniX

Зачем составлять то?

Уже нашел:

Код:

procedure TForm1.sButton1Click(Sender: TObject);
    var Match: TPerlRegEx;
begin

   Match := TPerlRegEx.Create;
   Match.RegEx := '<div class="model"><a href="(.*)">';
   Match.Subject := TStringList.Text;

   sLinks:= TStringList.Create;

   if Match.Match then

   repeat
    Application.ProcessMessages;
    TStringList.Add('http://' + Match.Groups[1]);
   until not Match.MatchAgain;

   Match.Free;

end;