VPF::Атрибуты HTML тэга - Форум программистов

artemiy

Дата 27.1.2009, 12:30 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 121
Регистрация: 22.2.2007

Репутация: нет
Всего: нет

Есть строка, представляющая собой определенный HTML тэг, например

Код


<input value="" name="test_field" id="test_field" type="text" onblur="this.value=some_function()">

Как можно легко (кроме pos(), posEx() и т.п.) определить значения определенных атрибутов этого тэга?

P.S. В регулярных выражениях я не силен, поэтому был бы рад если их использование будут советовать вместе с примером smile

Это сообщение отредактировал(а) artemiy - 27.1.2009, 12:34

cemick

Дата 27.1.2009, 13:42 (ссылка)

(голосов:1)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 416
Регистрация: 6.7.2006
Где: Санкт-Петербург

Репутация: 2
Всего: 6

Пример использования регулярных выражений:

Код


//Функция возвращает значение атрибута
function GetValue(AName:string):string;
  var  r : TRegExpr;
  const
    regex = '%s=[\s]*[''"](.*?)[''"]';
  begin
     r := TRegExpr.Create;
     try
        r.Expression := Format(regex, [AName]);
        r.InputString := '<input value="" name="test_field" id="test_field" type="text" onblur="this.value=some_function()">';

        with r do
        begin
          ModifierS := true;
          ModifierX := true;
          ModifierI := true;
        end;
        if r.Exec then
        begin
          Result := r.Match[1];
        end;
     finally
        r.Free;
     end;

   end;

К компоненту RegExpr есть неплохой хелп...

Это сообщение отредактировал(а) cemick - 27.1.2009, 13:44

artemiy

Дата 27.1.2009, 18:46 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 121
Регистрация: 22.2.2007

Репутация: нет
Всего: нет

Спасибо, буду пробовать smile

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »