
24.05.2015, 20:58
|
 |
Гуру
|
|
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
|
|
Вот вам вариант без регулярок:
Код:
Var
Htm: String;
SL: TStringList;
begin
Htm := '<img src=''/images/icon/race/1.png'' alt=''''/> Вася<br/>';
SL := TStringList.Create;
SL.Text := WrapText(Htm, #13, ['>','<'], 1);
ShowMessage(Copy(SL.Strings[1], 1, Length(SL.Strings[1])-1));
SL.Free;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
|