:
- ()
:
. ( ) ( Image). , , Image PaintBox.
Canvas. , Canvas (, ) Tanvas. (, , , ..), (, ; ; ).
- Pixels, TColor. (x) (y) . ( x , y - ). (.1). , Height Width : ClientHeight ClientWidth.
: 8 32 .
- (Color). TColor. Color . Turbo Delphi Tolor. (, clGreen - ), , Windows (, clBtnFace - ).
|
|
|
|
|
|
|
.1. ()
1 , Color:
|
|
1
clBlack | clSilver | ||
lMaroon | clRed | ||
clGreen | clLime | ||
clOlive | clBlue | ||
clNavy | - | clFuchsia | - |
lPurple | clAqua | ||
clTeal | - | clWhite | |
clGray |
, . , , .
Pen TPen. , . - Color - , . - Width ( ), 1 . Style . 2 , Style.
2
psSolid | |
psDash | , |
psDot | , |
psDashDot | , |
psDashDotDot | , |
psClear | ( ) |
. 1 .
, Pen.Color.
PenPos Toint ( Toint , y ). . , .. PenPos, MoveTo (x, y). (x, y) LineTo (x, y) (x, y). PenPos , LineTo .
Brush TBrush. . Brush - , . Color , Style - (). 3 , Style:
3
bsSolid | |
bsClear | |
bsHorisontal | |
bsVertical | |
bsFDiagonal | |
bsBDiagonal | |
bsCross | - , |
bsDiagCross | , |
4 :
4
Arc (x1, y1, x2, y2, x3, y3, x4, y4: integer ) | . (x1, y1) (x2, y2) , . , (x3, y3). , (x4, y4). . |
Chord (x1, y1, x2, y2, x3, y3, x4, y4: integer) | , . (x1, y1) (x2, y2) , . , (x3, y3). , (x4, y4). . (x3, y3) (x4, y4). |
Ellipse (x1, y1, x2, y2: integer) | . (x1, y1) (x2, y2) , . |
Pie (x1, y1, x2, y2, x3, y3, x4, y4: integer) | - . (x1, y1) (x2, y2) , . , (x3, y3). , (x4, y4). . , (x3, y3) (x4, y4). |
Polygon (Points: array of TPoint) | , Points. . |
PolyLine (Points: array of TPoint) | - , Points. PenPos . |
Rectangle (x1, y1, x2, y2: integer) | , (x1, y1), - (x2, y2). |
RoundRect (x1, y1, x2, y2, x3, y3: integer) | , (x1, y1), - (x2, y2). x3 y3. |
|
|
. (Chord, Ellipse, Pie, Polygon .) (Brush.Color Brush.Style).
FloodFill (x, y: integer; Color: TColor; FillStyle: TFillStyle). TFillStyle :
type TFillStyle = (fsSurface, fsBorder);
(x, y) . Color FillStyle. Color , , FillStyle , . FillStyle = fsSurface, , Color, . FillStyle = Border, , , , Color, Color .
TextOut (x, y: integer; text: string). Font TFont, .
5 Font.
5
Name | () (Arial, Times New Roman, Courier, ..) |
Size | P (points). 1/72 . |
Style | : fsItalic (), fsBold (), fsUnderLine (), fsStrikeOut(). , |
Color | |
Height |
|
|
(x, y) Font. Brush ( , Brush.Style bsClear Brush.Color , , , clBtnFace). PenPos Pen .
Delphi. , 80% , .