Canvas (), . - TBitmap, TComboBox, TDBComboBox, TDBGrid, TDBListBox, TDirectoryListBox, TDrawGrid, TFileListBox, TForm, TImage, TListBox, TOutline, TPaintBox, TPrinter, TStringGrid. Canvas , , (Pen), (Brush) (Font). Canvas : Draw, TextOut, Arc, Rectangle . Canvas.
.. Canvas.Pen : Color, Width, Style, Mode.
Color . Delphi , , clRed, clYellow . , Win32. , clActiveCaption clHighliteText Win32. .
Canvas.Pen.Color:= clBlue;
, , Style. , Pen.Style:
psClear | |
psDash | , |
psDashDot | , |
psDashDotDot | , -- |
psDot | , |
psInsideFrame | , |
psSolid |
, :
Canvas.Pen.Stylel:= psDashDot;
Pen.Width , . .
, 1 . , 2, . 16- GDI, Win32 . |
( TPen) , ( TBrush) , . , .
TBrush Color, Style BitMap, , . Color , Style , BitMap , , .
|
|
Style : bsSolid, bsClear, bsHorizontal, bsVertical, bcFDiagonal, bsBDiagonal, bsCross bsDiagCross. clWhite, bsSolid, . .
Canvas.Font , Win32 . , Color, Name, Size, Height Style.
Font.Color Delphi . , :
Canvas.Font.Color:= clRed;
Name Windows. , , :
Canvas.Font.Name:= Times New Roman;
Canvas.Font.Size .
Canvas.Font.Stile , , .
fsBold | |
fsItalic | |
fsUnderline | |
fsStrikeOut |
:
Canvas.Font.Style:= [fsBold, fsItalic];
Tmemo.Font TfontDialog:
If FontDialog1.Execute then
Memo1.Font.Assign(FontDialog1.Font);
, , TfontDialog, Canvas, :
Canvas.Font.Assign(FontDialog1.Font);
, Canvas , , TfontDialog:
Canvas.Font.Name:= Font.Dialog1.Font.Name;
Canvas.Font.Size:= Font.Dialog1.Font.Size;
1.
, , . , ( , , ..)
2.
: , . ( a,b a,b,c , , ..).
3
, . .