Страница 1 из 1
Как Source-процедуре использовать Template
Добавлено: 22 Сентябрь 2006, 16:01
vetal
Привет, всем!
В Reporte созданом без шаблонов, нужно всавить штрих-код, есть библиотека Taboga! Если Report сождаётся мастером то проблем нет, а как достучатся до неё из Source.
Добавлено: 24 Сентябрь 2006, 16:56
Олег
Код: Выделить всё
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 и пр.)
Добавлено: 25 Сентябрь 2006, 15:46
vetal
Спасибо, за доходчивый ответ!
