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

рисунок с текстом   Найти похожие ветки 

← →
Bradobrei   (2005-11-11 08:23) [0]

Вот я скачал компонент elRichView в котором может быть текст с рисунками. Теперь я хочу чтобы юзер ввели с ричедит1 тест и если он введет еще там :s: то добавиться рисунок. Я попробовал сделать так и если я ввожу туда например 123:s::s:321 то в elRichView1 будет 123(рисунок):s:321(рисунок)321
Скажите плиз как сделатЬ?

procedure TForm1.Image5Click(Sender: TObject);
var o,r,j: Integer;
s,t:string;
begin
r:=0;
 With elRichView1.Objects do
   begin
     BeginUpdate;
     try
     for o:=0 to length(richedit1.Text)-1 do
     begin
if ((richedit1.Text[o]=":") and (richedit1.Text[o+1]="s")
and (richedit1.Text[o+2]=":")) then
    begin
     s:=copy(richedit1.Text,r,o-1);
     AddColorText(s, $000042CA);
     AddGraphic(image13.Picture.Graphic, false);
     r:=o+3;
     end;
 end;
finally
       EndUpdate;
     end;
     t:=copy(richedit1.Text,r,length(richedit1.Text));
     AddColorText(t, $000042CA);
           AddBreak;
     end;

---

← →
Al_Ba ©   (2005-11-11 08:34) [1]

> Вот я скачал компонент elRichView в котором может быть текст
> с рисунками.

А саму компоненту не подкинешь ?

---

← →
Bradobrei   (2005-11-11 09:15) [2]

нашел на torry.ru

---

← →
Manok   (2005-11-11 11:45) [3]

тоже хотел бы знать пишу тут чат

---

← →
Bradobrei   (2005-11-11 16:39) [4]

ну кто нить подскаите плиз

---

← →
аматор ©   (2005-11-11 20:29) [5]

Привет.
Лучший совет - эт пример, в инете есть много исходников (сам случайно скачал окло трёх, кажись) плюс есть библиотека джеди (там ещё пример).
И приемер класный (и вообще картинки можно добавить и в стандартный (ну а таблицы, вот с этим была и есть проблемка, но уже три компонента вырыл))
Ссылок, ссори, комп другой.

---

← →
аматор ©   (2005-11-12 15:11) [6]

Угу elRichView - за него деньгу нужно платить...

---

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

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



Память: 0.46 MB
Время: 0.03 c