.


:




:

































 

 

 

 


graph. , .

GRAPH.

() ( ) Line(X1, Y1, X2, Y2: Integer) (X1,Y1) (Y1,Y2) .
(X,Y) LineTo(x, y: Integer); . ( ).
LineRel(dx, dy: Integer); dx, dy
SetLineStyle(LineStyle, Pattern, Thickness: Word), , ( , ..).
,
Circle(x, y,: Integer; Radius: Word) (X,Y) - , Radius - .
Arc(X,Y: Integer; StartAngle,EndAngle,Radius: Word) Radius (X,Y) StartAngle EndAngle:
: Ellipse(X,Y: Integer; StartAngle, EndAngle, XRadius, YRadius: Word) XRadius YRadius - .
Rectangle(X1, Y1, X2, Y2: Integer), (X1,Y1)-(X2,Y2).
Drawpoly (N, : Integer) N ,
Putpixel (x,y,color:integer);

1. . 2.

 
EmptyFill  
LineStyle ( ) SolidLn DottedLn CenterLn DashedLn UserBitLn   SolidFill  
LineFill   ---
LtSlashFill   ///
SlashFill   ///
Thickness () NormWidth ThickWidth   BkSlashFill   \\\
LtBkSlashFill   \\\
      HatchFill  
XhatchFill  
CloseDotFill   InterleaveFill  
UserFill   , WideDotFill  

GRAPH. , .

. , , ( ).

SetColor(Color: Word) -
SetBkColor (Color: Word) .
() SetFillStyle(Pattern: Word; Color: Word) Pattern , Color .
, . Bar(X1, Y1, X2, Y2: Integer) (X1,Y1) (X2,Y2) .
, , D3. Bar3D(X1, Y1, X2, Y2: Integer; D3: Word; Top: Boolean) Top : True - , False - . , , , .
, Sector(X, Y: Integer; StartAngle, EndAngle, XRadius, YRadius: Word) , Arc, Ellipse.
, . PieSlice(X, Y: Integer; StartAngle, EndAngle, Radius: Word) , Ellipse.
FloodFill(X, Y: Integer; Border: Word) (X,Y), Border.
Fillpoly (N, : integer);

(X,Y) , , , SetFillPattern SetFillStyle. , . , , .

1. Color.

Black Blue Green Cyan Red Magenta Brown LightGray   () - DarkGray LightBlue LightGreen LightCyan LightRed LightMagenta Yellow White   - - . (-) -


<== | ==>
| ,
:


: 2017-02-28; !; : 458 |


:

:

- , , .
==> ...

1709 - | 1496 -


© 2015-2024 lektsii.org - -

: 0.008 .