Вниз
Скачать: CL | DM;

WebBrowser   Найти похожие ветки 

← →
Иван_А   (2007-10-30 16:49) [0]

Уважаемые мастера.
Как подсветить текст, содержащий часть текста
или полную часть текста, но не полную строку, цветом.
Спасибо.


← →
homm ©   (2007-10-30 16:56) [1]

> [0] Иван_А   (30.10.07 16:49)
> Как подсветить текст, содержащий часть текста
> или полную часть текста, но не полную строку, цветом.

Прожуй.


← →
clickmaker ©   (2007-10-30 16:59) [2]

Как подсветить текст, <font color="red">содержащий часть текста</font>

или полную часть текста, но не <font color="red">пол</font>ную строку, цветом


← →
Иван_А   (2007-10-30 17:04) [3]

procedure SearchText(aText: string);
var
 i: Integer;
begin
 for i := 0 to WebBrowser1.OleObject.Document.All.Length - 1 do
 begin
   if Pos(aText, WebBrowser1.OleObject.Document.All.Item(i).InnerText) <> 0 then
   begin
     WebBrowser1.OleObject.Document.All.Item(i).Style.Color := "#FFFFDE";
     WebBrowser1.OleObject.Document.All.Item(i).ScrollIntoView(True);
   end;
 end;
end;
Так подсвечивается вся строка, а мне нужен только тот текст, который попадает под поиск.


← →
clickmaker ©   (2007-10-30 18:05) [4]


> мне нужен только тот текст, который попадает под поиск.

StringReplace (InnerHtml, aText, Format("<font color="#FFFFDE">%s</font>", [aText]), [rfReplaceAll]);


← →
b z   (2007-10-30 18:49) [5]


> font

говорят, что:
The <font> tag in HTML is deprecated. It is supposed to be removed in a future version of HTML.
:)


← →
MetalFan ©   (2007-10-30 21:25) [6]


> [5]

ого!


← →
clickmaker ©   (2007-10-31 09:41) [7]


>  [5] b z   (30.10.07 18:49)
>
> > font
>
> говорят, что:
> The <font> tag in HTML is deprecated

да и хрен-то с ним
<span style="color: #FFFFDE">Text</span>



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
10-1138801820
Вопрошающий
2006-02-01 16:50
2008.02.10
Не работает удалённо клиент


2-1200302804
vint45
2008-01-14 12:26
2008.02.10
Запись набора байтов по адресу памяти в строковую переменную


15-1199560473
tesseract
2008-01-05 22:14
2008.02.10
задача Пупы Васькина


15-1199797926
Kolan
2008-01-08 16:12
2008.02.10
Поставил RAD 2007, хоть бы с русским баг исправили&amp;#133


15-1199641953
DVM
2008-01-06 20:52
2008.02.10
Потестите модуль для расчета CRC8/16/32/64




   Наверх