|
|
|
Левый Правый колонтитул?
|
|||
|---|---|---|---|
|
#18+
В отчете надо программно заказать колонтитулы(поля) страницы левый, правый, верхний нижний, порыл хелп не нашел... Как к ним обратиться и изменить? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2004, 13:21:34 |
|
||
|
Левый Правый колонтитул?
|
|||
|---|---|---|---|
|
#18+
BadBadВ отчете надо программно заказать колонтитулы(поля) страницы левый, правый, верхний нижний, порыл хелп не нашел... Как к ним обратиться и изменить? 1 колонтитулы исключительно верхний и нижний левый - не встречал 2 программно заказать - что имелось в виду /термин не ясен. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2004, 13:27:43 |
|
||
|
Левый Правый колонтитул?
|
|||
|---|---|---|---|
|
#18+
Может я неправильно выразился, но имеется ввиду параметры страницы на которой выводится отчет, поле верхнее, нижние, левое, правое Надо изменить их из VB, то есть заранее установить фиксированно Для чего это надо? При переносе базы с одной машины на другую, отчеты при печати используют настройки по умолчанию для конкретной машины, а на всех они разные. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2004, 13:36:34 |
|
||
|
Левый Правый колонтитул?
|
|||
|---|---|---|---|
|
#18+
Access97 Margin- поле(англ.) Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2004, 13:48:26 |
|
||
|
Левый Правый колонтитул?
|
|||
|---|---|---|---|
|
#18+
С этим можно голову сломать. Для чего? В дизайне надо спасать отчеты со своей установкой принтера, тогда, если установка у клиента совпадант по размеру бумаги (большинство работают на А4) - нет никаких проблем. Для решения проблемы в противном случае, лучше , на мой взгляд, создать свой ToolBar, перетянуть в него все кнопки, связанные с печатью, в том числе, предварительный просмотр отчета с установкой принтера. Акс запомнит эти установки для конкретного отчета. Если не будет запоминать, можно на закрытии отчета дать соотв. команду. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2004, 14:02:58 |
|
||
|
Левый Правый колонтитул?
|
|||
|---|---|---|---|
|
#18+
Нашел!!!!!!!! Спасибо Shuhard Вот ответ: Private Type str_PRTMIP strRGB As String * 28 End Type Private Type type_PRTMIP xLeftMargin As Long yTopMargin As Long xRightMargin As Long yBotMargin As Long fDataOnly As Long xWidth As Long yHeight As Long fDefaultSize As Long cxColumns As Long yColumnSpacing As Long xRowSpacing As Long rItemLayout As Long fFastPrint As Long fDatasheet As Long End Type Public Sub SetMarginsToDefault(ByVal strName As String) Dim PrtMipString As str_PRTMIP Dim PM As type_PRTMIP Dim rpt As Report ' Open the report. DoCmd.OpenReport strName, acDesign Set rpt = Reports(strName) PrtMipString.strRGB = rpt.PrtMip LSet PM = PrtMipString ' Set margins. PM.xLeftMargin = 1 * 1440 PM.yTopMargin = 1 * 1440 PM.xRightMargin = 1 * 1440 PM.yBotMargin = 1 * 1440 ' Update property. LSet PrtMipString = PM rpt.PrtMip = PrtMipString.strRGB Set rpt = Nothing End Sub Взял из акцесса, нашел по слову PrtMip Может кому пригодится, из басика можно с отчетом творить все что угодно!!! Там еще один пример есть (в хелпе) как колонками управлять... Оказывается есть почти все, надо только знать где искать ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2004, 15:11:58 |
|
||
|
|

start [/forum/topic.php?fid=45&fpage=1604&tid=1673558]: |
0ms |
get settings: |
8ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
264ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
31ms |
get tp. blocked users: |
1ms |
| others: | 175ms |
| total: | 509ms |

| 0 / 0 |
