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

Поиск ссылок (картинки)   Найти похожие ветки 

← →
able ©   (2004-03-28 21:15) [0]

ЗДраствуйте! Как лучше реализовать замену всех ссылко на картинки в RichEdit"e? То есть находить <img src="ggg"> и менять на <img src="заданный текс"> ??


← →
Algol   (2004-03-28 21:30) [1]

Если это HTML, то лучше это делать не в RichEdit, а в WebBrowser


← →
Piter ©   (2004-03-28 21:39) [2]

able (28.03.04 21:15)
есть находить <img src="ggg"> и менять на <img src="заданный текс"> ??


Ну так и реализовать. Ищи текст, заменяй его... в чем проблема?


← →
able ©   (2004-03-28 22:28) [3]

>Если это HTML, то лучше это делать не в RichEdit, а в WebBrowser
но мне надо в RichEdit"e... или сохранить страничку, открыть в WebBrowser, подправить, и опять в РичЭдит?

>Ну так и реализовать. Ищи текст, заменяй его... в чем проблема?
делал я уже. моя процедурка оч. долго ищет (некоторые HTML-файлы большые, сам знаешь)... может у кого-нить есть?


← →
Dima_dvp ©   (2004-03-29 01:30) [4]

А ты как искал?
в теории:


do {
 нашёл позицию "<"
 нашёл следующую за ней позицию ">"
 проверил идёт ли после "<" подстрока "img"
 если да, то нашёл далее в комбинацию "src"
 затем позицию след. за ним символа "=" (помня что между "src" и "=" могут быть пробелы, табуляции и т.д.)
 по томуже принипу нашёл значение свойства (учтя, что если первый символ - кавычка, то значение свойства будет до след. каычки, а если нет то до преового пробела, табуляии и т.д.)
} while(не обошёл все символы "<")


← →
able ©   (2004-03-29 14:22) [5]

Попробуем


← →
Algol   (2004-03-29 15:21) [6]


> или сохранить страничку, открыть в WebBrowser, подправить,
> и опять в РичЭдит


Сохранять не обязательно, просто передай браузеру как строку
типа
var doc:Variant;
doc:=WebBrowser1.document;
doc.documentElement.innerHTML := RichEdit1.Text;
//ищем ссылки
...
//пихаем обратно в ричедит
RichEdit1.Text:=doc.documentElement.innerHTML;



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

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



Память: 0.46 MB
Время: 0.033 c
4-1076290857
EcoloRa
2004-02-09 04:40
2004.04.18
Свое окно поверх окна диспетчера задач


14-1080029594
Volodya_
2004-03-23 11:13
2004.04.18
Почтовый клиент


1-1080557456
Эли
2004-03-29 14:50
2004.04.18
Открыть окно Эксплорера в своей программе


3-1079622694
Masha Streltsova
2004-03-18 18:11
2004.04.18
Picklist в DBGrid е


3-1080049676
Voland777
2004-03-23 16:47
2004.04.18
Помогите заполнить image поле !!!




   Наверх