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

Помогите с QuickReport-ом   Найти похожие ветки 

← →
Z_man7777 ©   (2003-07-16 09:09) [0]

Здравствуйте, Уважаемые Мастера!!!
Дано: Есть текст, хранящийся в базе данных (InterBase 6.0/FireBird) в поле типа Blob, сохраненный как Word-овский документ. В тексте встречаются подчеркивания для вставки туда своего текста, типа как шаблон какого-либо договора. Какой именно текст я не знаю.
Задача: Нужно в подчеркивающие области вставить свой текст и не просто вставить, но чтобы подчеркивания остались.
Если кто может помочь - помогите, пожалуйста!!!
Заранее спасибо!!!

---

← →
Anatoly Podgoretsky ©   (2003-07-16 09:13) [1]

В BeforePrint таоего компонента вывода можешь заменить хоть весь текст

---

← →
Z_man7777 ©   (2003-07-16 09:21) [2]

А как мне узнать куда вставлять текст???
Предлагаете перелапачивать весь текст по символьно???

---

← →
Anatoly Podgoretsky ©   (2003-07-16 10:06) [3]

Это только ты знаешь, поскольку это твой формат

---

← →
Z_man7777 ©   (2003-07-16 11:23) [4]

Так ведь я же писал какой формат - MSWord-овский

---

← →
Anatoly Podgoretsky ©   (2003-07-16 11:59) [5]

Что то не уверен, что бы QR поддерживал WORD формат

---

← →
Z_man7777 ©   (2003-07-16 12:18) [6]

А сначала выгружаю текс из базы в обычный *.rtf формат, а потом содержимое получившегося файла записываю в TQRRichText

---

← →
Anatoly Podgoretsky ©   (2003-07-16 12:23) [7]

*.rtf это уже не Ворд. Делай парсинг и меняй или аытайся заменить прямо в TQRRichText

---

← →
NickBat ©   (2003-07-16 12:28) [8]

Для RichText

pp := RichText.FindText("___",0,Length(RichText.Text),[stMatchCase]);
if pp<>-1 then
begin
RichText.SelStart:=pp;
RichText.SelLength:=Length("___");
RichText.SelText:="My simple text";

---

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

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



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