Если ВнешняяКомпонента.НайтиШрифт("Tahoma") Тогда
// Выбираем его как шрифт для формирования картинки.
ВнешняяКомпонента.Шрифт = ИмяШтрифта;
Иначе
// Шрифт Tahoma в системе отсутствует.
// Обойдем все доступные компоненте шрифты.
...
Взято из УТ11. Asmody, посоветуй, пожалуйста...
(3) все равно рваные циферки получаются. Такое ощущение, что сама компонента их уродует. Поле вне штрихкода этими шрифтами великолепно прорисовывает.
Наверное, что-то при масштабировании с ними происходит (уменьшения до этикетки 3х2).
(5) Оп-ля-ля, ВнешняяКомпонента.РазмерШрифта = 10 не меняет размера шрифта!!!
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший