11
DELPHI
. , , , , , , , ..; TPaintBox TCanvas, Delphi.
Delphi .
.
1.
.
1. Sin(x)
Chart Additional.
, .
Sin(x).
. , Edit Chart . Series TCharSeries, .
, Add, (. ).
.
, AddX, AddY, AddXY TCharSeries ( Series[n] 0, 1, 2 ..
OnActivate Sin(x).
procedure TForm1.FormActivate(Sender: TObject);
var
k: integer;
begin
For k:=0 to 20 do
Chart1.Series[0].AddXY(k,sin(k*pi/10),'',clRed);
end;
2. 11/ 1.
:
| 1 | 2 | 3 | 4 | |
| . . . . |
11/.
2
DELPHI
1. :
2
TCanvas (), , .
|
|
|
. .
| TCanvas | |||||||||
| Brush | TBrush | ||||||||
| Pen | TPen | ||||||||
| Font | TFont | ||||||||
| Pixels[X,Y] | TColor | (X,Y) | |||||||
| TCanvas | |||||||||
| Ellipse(Xl,Yl,X2,Y2) | , | ||||||||
| LineTo(X,Y) | . , MoveTo(X,Y), | ||||||||
| MoveTo(X,Y) | . | ||||||||
| Polyline:(array of:TPoint) | |||||||||
| Polygon (array of Point) | |||||||||
| Rectangle(X1,Y1,X2,Y2} | |||||||||
| TextOut{X,Y,Text) | |||||||||
| RoundRect(X1,Y1, X2,Y2, X3,Y3) | , X1,Y1 , X2,Y2 , X3,Y3 . | ||||||||
| Arc(X1,Y1, X2,Y2, X3,Y3,X4,Y4) | , X1,Y1 , X2,Y2 , X3,Y3 , X4,Y4 . . | ||||||||
| TBrush. | |||||||||
| Color | TColor | ||||||||
| Style | TBrushStyle | (bsSolid - , bsCiear -, bsHorizontal , bsVertical - ) | |||||||
| n. | |||||||||
| Color | TColor | ||||||||
| Style | TPenStyle | (psSolid - , psDash - , psDot - , psDashDot - -, psDashDotDot - --, psClear - ) | |||||||
| Width | Integer | ||||||||
| TFont. | |||||||||
| Color | TColor | ||||||||
| Name | String | ||||||||
| Size | Integer | ||||||||
| Style | TFontStyles | : , , , | |||||||
2.:
, .
3.:
4.:
11/ 2.
3
