powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Обрезается изображение в отчёте.
9 сообщений из 9, страница 1 из 1
Обрезается изображение в отчёте.
    #39952464
melihron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем привет камрады.
Суть проблемы : при выводе на печать сформированного в отчёте чертежа, картинка обрезается.
Access 2003 и 2013
Подскажите плиз кто знает.
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952468
melihron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну то есть сначала она вся печаталась, но вот по мере её доработки, почему-то стала обрезаться процентов на 70. :( ничего вроде не менял...
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952733
melihron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вопрос снимается. Access не виноват.
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952745
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
melihron
Вопрос снимается. Access не виноват.
А кто виноват? Вот придёт следующий вопрошающий (иногда поиском пользуются, я надеюсь), а тут такой облом - вопрос есть, ответа нет...
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952748
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
настройки принтера?
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952784
melihron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Панург
melihron
Вопрос снимается. Access не виноват.
А кто виноват? Вот придёт следующий вопрошающий (иногда поиском пользуются, я надеюсь), а тут такой облом - вопрос есть, ответа нет...


как бы так покороче то....
Для постройки чертежа, я перебираю строчки рекордсета, и в зависимости от значений, вычисляются координаты отрисовки каждой детальки
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
  Set rs = DBEngine(0)(0).OpenRecordset(q)
  Do Until rs.EOF
'------------------------------------------------------------
  rs.MoveFirst
    If rs("id").Value = rs("main_remains_id").Value Then ' считаем, что это материнская панель
      If XPanel = 0 Then ' ----------убрал вот этот IF
        XPanel = rs("rx"): YPanel = rs("ry")
.....
        ScaleMode = 3
.....
' координаты нулевой панели
        x00 = ScaleTop
        y00 = ScaleLeft + 700
        xmax0 = ScaleWidth
        ymax0 = ScaleHeight - 100
        DrawTitle
        DrawSquare

'      Line (1, 950)-(4000, 950), RGB(0, 0, 0)
'      End If ' If XPanel = 0 Then
    End If ' If rs("id").value = rs("main_remains_id").value Then
    
' rs("rx") - ширина болванки
' rs("ry") - длина болванки
' rs("dx") - смещение по x
' rs("dy") - смещение по y    

и т.д...

методом построчного сравнения рабочего модуля двухнедельной давности и текущего, обнаружилось, что если убрать проверку
Код: vbnet
1.
      If XPanel = 0 then


то отрисовка не кривеет.
Смысл грубо в том, что по значениям первой записи рекордсета формируется шапка и определяются некоторые начальные координаты всего остального.
В том числе ширина материнской панели XPanel, на основе значения которой идут дальнейшие расчёты... так вот если убрать эту проверку, то рисуется нормально.
Переделал процедуру так, что сначала делаю MoveFirst... рисую на основе первой записи шапку и остальные расчёты.... а потом делаю перебор остальных записей рекордсета...
как-то так... вобщем так я особо и не понял собственно, что было... значение переменной теряется почему-то... наверно я чего-то не знаю...
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952790
melihron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
в итоге получается вот такая красотень
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952965
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
melihron,
самое интересное что "Basis" (Баз.мебель)делает это без проблем с самым рациональным раскроем (для материала без рисунка или с указанием ориентирования детали если материал с текстурой,задается отступ от края,толщина пилы и т.д и т.п.) Сама программа,точно не знаю,но не последние версии, бесплатны и их функционала хватает за глаза
...
Рейтинг: 0 / 0
Обрезается изображение в отчёте.
    #39952976
melihron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku
melihron,
самое интересное что "Basis" (Баз.мебель)делает это без проблем с самым рациональным раскроем (для материала без рисунка или с указанием ориентирования детали если материал с текстурой,задается отступ от края,толщина пилы и т.д и т.п.) Сама программа,точно не знаю,но не последние версии, бесплатны и их функционала хватает за глаза


правда штоли? о, вы такой умный... в следующий раз обязательно у вас сначала консультироваться
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Обрезается изображение в отчёте.
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]