| |
|
|
| | в отчете есть полсе со сойством "расширение =да"
как выловить высоту секции на этапе формирования отчета и нарисовать контрол такой же высоты
Private Sub ОбластьДанных_Format(Cancel As Integer, FormatCount As Integer)
Me!Линия.Height = Me.ОбластьДанных.Height
End Sub
|
не помогает | |
| |
| |
| |
|
|
| | а по высоте этого поля ориентироваться нельзя? | |
| |
| |
| |
|
|
| | No Private Sub ОбластьДанных_Format
Private Sub ОбластьДанных_Print | |
| |
| |
| |
 12 Кб. |
|
| | невозможно задать значение свойства Height после начала печати
это не я, это майкрософт сказал
а ориентироваться на поле не получается, так как в процессе format высота поля получается 0
а когда он в него данные влил и расширил-высота меняется
просто поле с расширением
ПыСы
Для желающих посмотреть в натуре -экзэмпл в атачменте | |
| |
| |
| |
26 Кб. |
|
| | вешай на принт рисование линии - как в примере (у меня Access не локализован, в твоем примере сделать ничего не могу)
Private Sub Detail_Print(PrintCount As Integer, Cancel As Integer)
Me.Line (0, 0)-(0, Me.Height)
End Sub
линия рисуется по высоте секции | |
| |
| |
| |
|
|
| | Private Sub ОбластьДанных_Print
потому что именно в принте Вы получите реальную высоту контролов после их форматирования
а линию нужно рисовать. Правильно Вам ответили | |
| |
| |
| |
|
|
| | Извиняюсь, я был неправ-что обусловленно моим незнанием предмета 
Спасибо всем кто откликнулся  | |
| |
| |
