Помощь - Поиск - Пользователи - Календарь
Полная версия: Печать из Delphi
Форум «Всё о Паскале» > Delphi, Assembler и другие языки. > Delphi
YurKaluga
Задача такая:
к компу может быть подсоединен принтер (LPT или USB), а может быть только сетевой принтер.
Выбрать принтер, из установленных в системе, можно через PrintDialog. А как быть дальше?
Печатать нужно содержимое TStrings или TStringList, причем с определенным шрифтом и его размером.
Есть ли разница, и какая, при работе с сетевым принтером?
Да, и еще: текст в кодировке DOS.
hiv
Цитата(YurKaluga @ 13.01.2006 12:46) *

причем с определенным шрифтом и его размером.
Есть ли разница, и какая, при работе с сетевым принтером?
Да, и еще: текст в кодировке DOS.

Разницы в принципе никакой, тем более что 90% принтеров продаваемых у нас в стране не руссифицированы или не позволяют печатать из DOS. Поэтому перед печатью страницы ее нужно нарисовать в канве Printer.Canvas. Рисовать текст можно предварительно установив нужный шрифт и цвет у объекта Printer.Canvas. Текст выводится методом Printer.Canvas.TextOut(int X, int Y, const WideString Text); только кодировка текста должна быть win cp1251.
Удачи! smile.gif
YurKaluga
Спасибо!
Попёрло!!!
applause.gif
Просто с первого раза применение TPrinter вызывало ошибку чтения с нулевого адреса, а сегодня тот же пример пошел нормально. Почему не знаю...
hiv
Можно не создавать отдельный экземпляр объекта TPrinter, а воспользоваться готовой переменной (объектом) Printer. Но правильнее будет, если его выбирать из списка установленных принтеров.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.