RTF - вставка картинки (не работает)

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Timofey
Сообщения: 6
Зарегистрирован: 05 мар 2012, 11:37

RTF - вставка картинки (не работает)

Сообщение Timofey »

При использование

Код: Выделить всё

  InsFoto(outPath,’prbdoc.rtf’,0,0,0);
вставка не происходит остается пустой лист

А для использование WritePict необходимо чтоб он реализовался в интерфейсе, не совсем понятно, как его тогда использовать, для отчет, у которого форма прототипа уже определенна вида prbdoc

Это пример из справки, можно как то остаться с rtf, не создавая доп интерфейс и форму, или как использовать интерфейс тогда в rtf с формой прототипом prbdoc

Код: Выделить всё

A.prj:

#make "A.vip"

#make "B.frm"

#make "B1_W13_01.rtf"

#make "B1_W13_10.rtf"

#make "B1_W10_01.rtf"

#make "B1_W10_10.rtf"

#make "B1_W07.rtf"

#make "B1_W03.rtf"

Код: Выделить всё

A.vip:

interface A

  create view as select * from DOCREMARCH;

  form B('B.out');

  handleEvent

    cmInit: {

      B.WritePict(DOCREMARCH.MEMO, 'D')

      B.Write('Cat')

      B.PutEvent(feBreak)

      B.ShowFile('Отчет')

    }

  end

end.

Код: Выделить всё

.form B

.fields

  C 

.endfields

^

.endform
Den
Местный житель
Сообщения: 1842
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Ярославская область ОАО "Часовой завод Чайка" г. Углич
Контактная информация:

Re: RTF - вставка картинки (не работает)

Сообщение Den »

Наверное, можно попробовать InsFoto делать в докомпиляции родной печати после формирования формы и ее показа.
m0p3e показывал в опыте , как можно колонтитул в rtf заполнить после формирования формы, посредством Vb-скрипта Но , в любом случае, без Alter не обойтись будет.
Ответить