Страница: 1 |
Как не подключая к проекту отчёт, можно выводить на принтер из приложения, допустим таблицу с некими данными? И вообще как под VB работать с принтером?
1. Создай на форме листвью 2. For Each X In Printers List1.AddItem X.DeviceName Next X 3. Sub PrintMyBMP() On Error GoTo prnErr For Each X In Printers If List1.Text = X.DeviceName Then Set Printer = X End If Next X Printer.PaintPicture LoadPicture(App.Path & "Printpic.bmp"), 10, 10 Printer.EndDoc Exit Sub prnErr: MsgBox "Ошибка! Не могу напечатать изображение!", vbCritical, "ERROR!!!" End Sub 4. Ткни на нужный принтер в листе и пусти на исполнение PrintMyBMP Зайди на http://vb.astral.kiev.ua - там есть очень полезный пример работы с печатью RichTextBox (при полном контроле печати). Блин, от сердца оторвал эту ссылку... Спасибо за ссылку! есть функция Printer Печатать по хендлу, если не ошибаюсь. Получаешь хандл притера, по нему находишь DC и вперед, малюй на этом DC, сколько влезет... http://www.developerfusion.com - там описан полностью метод Printer Страница: 1 |
Вопрос: Работа с принтером
Добавлено: 15.12.03 22:09
Автор вопроса: Zorg
Ответы
Всего ответов: 6
Номер ответа: 1
Автор ответа:
crackoff
ICQ: 156165990
Вопросов: 12
Ответов: 229
Профиль | | #1
Добавлено: 16.12.03 15:48
Номер ответа: 2
Автор ответа:
Александр
Разработчик Offline Client
ICQ: 204034
Вопросов: 106
Ответов: 1919
Профиль | | #2
Добавлено: 17.12.03 08:40
Номер ответа: 3
Автор ответа:
Zorg
Вопросов: 17
Ответов: 1
Профиль | | #3
Добавлено: 18.12.03 16:54
Номер ответа: 4
Автор ответа:
M@X
Вопросов: 38
Ответов: 43
Профиль | | #4
Добавлено: 19.12.03 23:01
Номер ответа: 5
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #5
Добавлено: 20.12.03 21:53
Номер ответа: 6
Автор ответа:
Александр
Разработчик Offline Client
ICQ: 204034
Вопросов: 106
Ответов: 1919
Профиль | | #6
Добавлено: 20.12.03 22:28