Replace text with an Image

[DelphiDude]

I have worked out the find text and replace, now i am looking to find text and replace with image.
Find <IMAGE_001> and replace it with a bitmap/jpeg image.

[Sergey Tkachenko]

It's the same.
Instead of

Code: Select all

 if rve.SearchText(...) then
   rve.InsertText(...);

write

Code: Select all

 if rve.SearchText(...) then
   rve.InsertPicture(...);