| |
|
|
| | Уважаемые, требуется помощь. Задача: Необходимо вывести отчет, в одном из полей длина данных (String) больше ширины этого поля, в этом случае необходимо данные которые не влезли в поле целиком перенести на следующую строку отчета, при этом высота строки должна остаться неизменной.
Для того чтобы переносить данные на новую строку отчета мне нужно посчитать длину данных (string) в милиметрах, а не в символах. Дак вот как это сделать? или есть другой путь решения задачи? | |
| |
| |
| |
|
|
| | Если "в лоб" то:
Private Sub ОбластьДанных_Format(Cancel As Integer, FormatCount As Integer)
Me.ScaleMode = 6
Me.FontName = Me.fldTXT.FontName
Me.FontSize = Me.fldTXT.FontSize
Me.FontBold = Me.fldTXT.FontBold
Me.FontItalic = Me.fldTXT.FontItalic
Me.Print Me.TextWidth(Me.fldTXT)' это ответ в мм.
End Sub
Но лучше придумать другое решение.
Может все таки проще разрешить расширение для данного поля? | |
| |
| |
|
|
