Графічний інструментарій
В Delphi створенні спеціалізовані класи-надбудови, які спрощують використання інструментів Windows: для контексту – Tcanvas, для шрифту – Tfont, для пера – Tpen і для пензля – Tbrush. Зв’язані з цими класами об’єкти автоматично доступні програмі через властивості Canvas, Font, Pen, Brush.
IV.Клас Tfont.
За допомогою класу Tfont створюється об’єкт шрифт для будь-якого графічного пристрою (екран, прінтер, плоттер і т.д.)
Властивості класу:
Property Charset: TfontCharSet; Набір символів. Для російськомовних програм ця властивість звичайно має значення Default_Charset або Russian_Charset. Для відображення тексту Ms-Dos використовується значення Oem_Charset (альтернативне кодування).
Property Color: TColor; Колір шрифту.
Property Height:Integer; Висота шрифту в пікселях.
Property Name:TfontName; Ім’я шрифту в пікселях.
Property Pitch: TfontPitch; Визначає спосіб розташування літер в тексті: значення fpFixed задає одноширинний текст, при якому кожна літера має одинакову ширину; значення fpVariabel визначає пропорціональний текст, при якому ширина літери залежить від її накреслення; fpDefault визначає ширину, прийняту для поточного шрифту.
Property PixelPerInch:Integer; Визначає кількість пікселів екрану на один дюйм реальної довжени. Ця властивість рідко використовується програмістом, так як її використовує система для відповідності екранного шрифту до шрифту прінтера.
Property Size:Ineger; Висота шрифту в пунктах (1/72 дюйма). Зміна цієї властивості автоматично міняє властивість Height і навпаки.
Property Style: TfontStyles; Стиль шрифту. Може приймати значення як комбінацію наступних признаків: fsBold(жирний), fsItalic(курсив), fsUnderline (підкресляний), fsStrikeOut(перекреслений).
Для деяких випадків може стати в пригоді метод:
Procedure Assign (Source:Tpersistent);
За допомогою якого значення властивостей шрифту об’єкта Sourse присвоюються властивостям поточнного шрифта. Метод не змінює властивість PixelPerInch, тому його можливо використовувати для створення шрифту прінтера по екранному шрифту і навпаки.
V.Клас Tpen.
За допомогою класу Tpen створюється об’єкт-пензель, що служить для накреслення ліній.
Властивості класу:
Property Color: TColor; Колір накреслюваної пензлем лінії.
Property Handle: Integer; Дискрептор пензля. Використовується при безпосередньому звертанні до API-функціям Windows.
Property Mode: TpenMode; Визначає спосіб взаємодії лінії з фоном.
Property Style: TpenStyle; Визначає стиль лінії. Враховується тільки для ліній товщиною 1 піксель. Для товстих ліній стиль завжди psSolid.
Property Width: Integer; Товщина лінії в пікселях екрану.
Властивість Mode може приймати одне із наступних значень.
PmBlack |
Лінії завжди чорні. |
PmWhite |
Лінії завжди білі. |
PmNop |
Колір фону не міняється(ліній не видно). |
PmNot |
Інверсія кольору фона. |
PmCopy |
Колір ліній визначається властивістю Color пензля |
PmNotCopy |
Інверсія кольору пензля. |
PmMargePenNot |
Комбінація кольору пензля і інверсійного кольору фона. |
PmMaskPenNot |
Комбінація загальних кольорів для пензля і інверсійного кольору фону. |
PmMargeNotPen |
Комбінація інверсійного кольору пензля і фону. |
PmMaskNotPen |
Комбінація загальних кольорів для інверсійного кольору пензля і фону. |
PmMarge |
Комбінація кольорів пензля і фону. |
PmNotMarge |
Інверсія кольорів пензля і фону. |
PmMask |
Загальні кольори пензля і фону. |
PmNotMask |
Інверсія загальних кольорів пензля і фону |
PmXor |
Об'єднання кольорів пензля і фону операцією XOR; |
PmNotXor |
Інверсія об'єднання кольорів пензля і фону операцією XOR |