Мой DELPHI – Программирование

Всё для программера

9июня

Вместо печати графики я хочу использовать резидентный шрифт принтера. Как?

admin | Рубрика: Delphi FAQ

Метки: Canvas, Click, EndDoc, GetStockObject, Printers, Sender, TextOut, TForm, TTextMetric

Вопрос:
Вместо печати графики я хочу использовать резидентный шрифт принтера. Как?

Ответ:

Используте функцию Windows
API – GetStockObject() чтобы получить дескриптор (handle) шрифта по умолчанию
устройства (DEVICE_DEFAULT_FONT) и передайте его Printer.Font.Handle. Прочитать остальную часть записи »

9июня

При выполнении диалога FontDialog со свойством Device равным fdBoth or fdPrinter

admin | Рубрика: Delphi FAQ

Метки: CommDlg, CreateFontIndirect, FillChar, FontDialog, INITTOLOGFONTSTRUCT, iPointSize, Printers, procedure, SCALABLEONLY, TFont

Вопрос:

При выполнении диалога FontDialog со свойством Device равным fdBoth or fdPrinter, появляется ошибка
“There are no fonts installed”.

Ответ:

Эти установки должны показать
шрифты совместимые либо с принтером либо с экраном. В примере диалог Windows
ChooseFont вызывается напрямую чтобы показать список шрифтов, совместимых одновременно
и с экраном и с принтером. Прочитать остальную часть записи »

Delphi — язык программирования, который используется в одноимённой среде разработки. Название используется начиная с 7 версии среды разработки, ранее это был Object Pascal, разработанный фирмой Borland и изначально реализованный в её пакете Borland Delphi, от которого и получил в 2003 году своё нынешнее название. Object Pascal по сути является наследником языка Pascal с объектно-ориентированными расширениями. Де-факто Object Pascal, а затем и язык Delphi являются функциональными наращиваниями Turbo Pascal. Об этом говорят обозначения версий компилятора. Так, в Delphi 7 компилятор имеет номер версии 15.0 (Последняя версия Borland Pascal / Turbo Pascal обозначалась 7.0, в Delphi 1 компилятор имеет версию 8.0, в Delphi 2 — 9.0, и т. д. Номер версии 11.0 носит компилятор Pascal, входивший в состав среды C++ Builder).

Мой DELPHI – Программирование

Вместо печати графики я хочу использовать резидентный шрифт принтера. Как?

При выполнении диалога FontDialog со свойством Device равным fdBoth or fdPrinter

Рубрики

Архивы

Управление