|
|
|
| можно как нибудь настроить поле в отчете так чтобы в зависимости от размера значения(количества символов) менялся шрифт. то есть чтобы если поле длинное оно не вылазило за выделенные рамки а просто уменьшался шрифт. что нить типа autosize. | |
|
| |
|
|
|
| У отчета есть метод TextWidth, который возвращает длину текста в твипах.
Me.FontName = Me![Поле].FontName 'также FontBold и FontItalic
Me.FontSize = 10
If Me.TextWidth(Me![Поле].Value) <= Me![Поле].Width - 10 then '-10 - для надежности
Me![Поле].FontSize = Me.FontSize
End If
|
Это надо делать в цикле, уменьшая размер шрифта, пока не влезет.
В реальности надо также учитывать значения левого/правого отступа в поле и т.п.
В А97 этого метода нет, а в А2000 без обновлений - глючит.
Иначе это можно сделать с помощью API функций, но уж больно громоздко. | |
|
| |