15 мая 2023 года "Исходники.РУ" отмечают своё 23-летие!
Поздравляем всех причастных и неравнодушных с этим событием!
И огромное спасибо всем, кто был и остаётся с нами все эти годы!

Главная Форум Журнал Wiki DRKB Discuz!ML Помощь проекту

Delphi  >>>   Печать
Печать при помощи TPrinter 25.07.2002г.
Экземпляр TPrinter (с именем Printer) создаётся автоматически, если добавить юнит Printers.
Совместимость: Delphi
Печать в Delphi без использования TPrinter 25.07.2002г.
Следующий пример использует API функцию PrintDlg(), чтобы позволить пользователю выбрать принтер, а так же распечатать две страницы.
Совместимость: Delphi
Как программно добавить принтер 25.07.2002г.
Следующий пример является надстройкой для этой функции. Для этого необходимо знать Имя принтера, которое будет отображаться в Проводнике, имя порта, к которому подключён принтер (т.е. LPT1:), имя драйвера (прийдётся посмотреть вручную) и имя процессора печати (который обычно "winprint").
Компилятор: Delphi
Как узнать, какие принтеры установлены в системе 25.07.2002г.
Здесь представлены два способа: через реестр и через объект printer.
Компилятор: Delphi
Как узнать драйвер и порт принтера 25.07.2002г.
Иногда метод GetPrinter() компонента TPrinter возвращает пустую строку, поэтому целесообразно воспользоваться API для получения необходимых параметров из файла Windows.ini.
Совместимость: Delphi
Как изменить размер страницы при печати 25.07.2002г.
Один из способов, это перед началом печати изменить структуру devicemode у принтера.
Компилятор: Delphi
Как узнать все форматы бумаги, поддерживаемые принтером по умолчанию 25.07.2002г.
Ниже представлена процедура, которая имеет в качестве параметра любой объект StringList - Строки для Memo, Пункты Combo и т.д.
Компилятор: Delphi
Как установить свойство "точек на дюйм" в TPrinter 25.07.2002г.
При смене принтера, размер шрифтов может отмасштабироваться не правильно. Чтобы сделать правильное масштабирование, необходимо установить свойство PixelsPerInch шрифта.
Совместимость: Delphi
Как узнать края печати в Win16 и Win32 25.07.2002г.
В Win16, для этого используется API функция Escape() с константой GETPRINTINGOFFSET. В Win32, используется API функция GetDeviceCaps() с константами PHYSICALOFFSETX и PHYSICALOFFSETY. Однако, нет гарантии, что данная последовательность кодов поддерживается принтером, поэтому для проверки желательно всегда вызывать функцию Escape с константой QUERYESCSUPPORT.
Компилятор: Delphi
Как открыть далог "Add printer" 25.07.2002г.
Как пользоваться функцией EnumFontFamilies 25.07.2002г.
Следующий пример помещает в компонент TMemo список шрифтов и их размеров для текущего принтера.
Компилятор: Delphi
Как получить информацию о заданиях на принтере 25.07.2002г.
В Windows существуют встроенные средства для мониторинга заданий на принтере. Однако, давайте разберёмся, как отслеживать задания на принтере программно. Для существует API функция "EnumJobs", которая позволяет получить давольно много информации о текущем состоянии принтера (Имя задания, Состояние, дату, время и т.д.).
Компилятор: Delphi
Печать в цвете 17.07.2002г.
Чтобы напечатать в цвете, не требуется никаких особых усилий. Если принтер не поддерживает цветную печать, то Windows автоматически сконвертирует все цвета в оттенки серого. Если необходимо изменить цветовой режим программно, то можно воспользоваться структурой DevMode драйвера принтера.
Совместимость: Delphi
Самый простой способ печати 15.10.2001г.
Частенько у начинающих программистов возникает вопрос: "Как вывести информацию на печать минуя механизм печати Windows?". Механизм очень прост в использовании. Всё, что нужно, это воспользоваться функцией AssignFile, чтобы открыть файл с именем 'LPT1' (либо любой другой порт принтера). Операционная система распознаёт данное имя как специальный тип файла и перенаправляет вывод на порт принтера.
Совместимость: Delphi
Печать содержимого DBGrid через QuickReport 15.06.2001г.
Частенько у пользователя возникает необходимость распечатать отчёт из базы данных. Естественно, что он начинает просить Вас добавить такую возможность в приложение. Как оказалось, при помощи TQuickRep данную задачу можно очень легко решить.
Совместимость: Delphi 3.x (или выше)