Как Source-процедуре использовать Template

Clarion, Clarion 7

Модератор: Дед Пахом

Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
Ответить
vetal
Новичок
Сообщения: 7
Зарегистрирован: 23 Май 2006, 13:32
Откуда: Черкассы, Украина
Контактная информация:

Как Source-процедуре использовать Template

Сообщение vetal »

Привет, всем!

В Reporte созданом без шаблонов, нужно всавить штрих-код, есть библиотека Taboga! Если Report сождаётся мастером то проблем нет, а как достучатся до неё из Source.
Аватара пользователя
Олег
Ветеран движения
Сообщения: 122
Зарегистрирован: 16 Июль 2005, 2:35
Откуда: Москва
Контактная информация:

Сообщение Олег »

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

  INCLUDE('BARCODE.INC')

  ...
Report REPORT('Накладная'),...
Header DETAIL,AT(...),USE(?Header)
              STRING('Barcode'),AT(...),USE(?TBarcode),CENTER
           END
END

TBarcode                BarcodeClass
RPT:BarCodeType   BYTE
RPT:BarCodeValue  STRING(50)

  Code
  ...
  RPT:BarCodeValue = Docs::GetBarCode(...)
  RPT:BarCodeType = BARCODE:CODE128C
  ...
  Open(Report)
  ...
  TBarcode.Init(Report,?TBarcode,?Header)
  TBarcode.DrawText = 0
  TBarcode.Draw(RPT:BarCodeValue,RPT:BarCodeType)
  ...
  TBarcode.Kill
  ...
  Close(Report)
Отдельно подключать эту либу уже не надо - это будет сделано автоматически при обработке компилятором файла BARCODE.INC
Если необходимы дополнительные настройки - они задаются ПОСЛЕ строки TBarcode.Init.
RPT:BarCodeValue содержит значение штрих-кода. В переменной RPT:BarCodeType задается тип штрих-кода, мнемонические имена которых заданы в начале файла BARCODE.INC (BARCODE:CODE39, BARCODE:CODE128C и пр.)
vetal
Новичок
Сообщения: 7
Зарегистрирован: 23 Май 2006, 13:32
Откуда: Черкассы, Украина
Контактная информация:

Сообщение vetal »

Спасибо, за доходчивый ответ! :)
Ответить