Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как сделать окно предосмотра печати? / 11 сообщений из 11, страница 1 из 1
06.11.2014, 11:42
    #38797097
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
Нужно сделать окно предосмотра, чтобы можно было просматривать сразу много страниц одновременно (этикетки)
Подскажите компонент или пример кода для такой задачи.
...
Рейтинг: 0 / 0
06.11.2014, 11:52
    #38797114
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
а какой компонент вы используете для самой печати?
...
Рейтинг: 0 / 0
06.11.2014, 11:54
    #38797116
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
Shocker.Proа какой компонент вы используете для самой печати?

Никакой, печатаю средствами VB6. Посылаю на печать форму. Криво конечно, но работает.
...
Рейтинг: 0 / 0
06.11.2014, 14:07
    #38797301
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
Ну тогда все просто. Наристовать Form.Image в какой-нибудь Picture на форме предпросмотра. При указании координат и размера отрисовки исходное изображение формы будет пропорционально уменьшено.
...
Рейтинг: 0 / 0
07.11.2014, 10:24
    #38798212
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
AntonariyНу тогда все просто. Наристовать Form.Image в какой-нибудь Picture на форме предпросмотра.

у меня на форме нет картинки, только контролы
...
Рейтинг: 0 / 0
07.11.2014, 10:27
    #38798213
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
Image это не контрол, а свойство формы, возвращающее ее "скриншот".
...
Рейтинг: 0 / 0
07.11.2014, 16:20
    #38798699
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
AntonariyImage это не контрол, а свойство формы, возвращающее ее "скриншот".

оно возращает только картинку загруженную в качестве фона на форму, контролы которые лежать на ней не отображаюся на картинке
...
Рейтинг: 0 / 0
07.11.2014, 16:29
    #38798712
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
Eolt оно возращает только картинку загруженную в качестве фона на форму
Вы проверяли? Свойство для фоновой картинки называется Picture, а Image как раз и должен возвращать всё вместе с контролами.
...
Рейтинг: 0 / 0
07.11.2014, 17:31
    #38798798
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
AntonariyEolt оно возращает только картинку загруженную в качестве фона на форму
Вы проверяли? Свойство для фоновой картинки называется Picture, а Image как раз и должен возвращать всё вместе с контролами.

Сохраняет только фон формы, без контролов на ней

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Option Explicit

Private Sub Form_Activate()
    Dim img As IPictureDisp
    Set img = Form1.Image
    Call SavePicture(img, "c:\pic.bmp")
End Sub
...
Рейтинг: 0 / 0
07.11.2014, 17:51
    #38798824
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
Может просто оформить этикетку в виде юзерконтрола, а не формы. И, соответственно, иметь две формы, одну для предпросмотра, другую для печати.
...
Рейтинг: 0 / 0
07.11.2014, 19:01
    #38798929
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать окно предосмотра печати?
EoltСохраняет только фон формы, без контролов на нейтогда ищите примеры с BitBlt -> IPictureDisp
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как сделать окно предосмотра печати? / 11 сообщений из 11, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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