TCanvas
Propos
La classe vous permet de dessiner.
Description
Vous pouvez dessiner avec des outils de dessin - un stylo (Pen, responsable des lignes), un pinceau (Brush, responsable du remplissage) et une police (Police, responsable de l'apparence du texte).
La classe a les propriétés et méthodes suivantes :
Méthodes et propriétés |
Description |
procedure Arc (X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer) |
Dessine un arc d'ellipse dans le rectangle englobant (X1, Y1) - (X2, Y2). Le début de l'arc se trouve à l'intersection de l'ellipse et du rayon tracé de son centre au point (X3, Y3), et la fin se trouve à l'intersection avec le rayon du centre au point (X4, Y4). L'arc est dessiné dans le sens antihoraire. |
procedure ArcTo (X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer) |
Dessine un arc d'ellipse dans le rectangle englobant (X1, Y1) - (X2, Y2). Le début de l'arc se trouve à l'intersection de l'ellipse et du rayon tracé de son centre au point (X3, Y3), et la fin se trouve à l'intersection avec le rayon du centre au point (X4, Y4). L'arc est dessiné dans le sens antihoraire. |
procedure AngleArc (X, Y: Integer; Radius: Cardinal; StartAngle, SweepAngle: Single) |
Dessine un arc autour du périmètre du cercle spécifié par les paramètres. |
property Brush: TBrush |
Une référence à l'objet Pinceau (Brush). Responsable de remplir l'arrière-plan des formes. |
property Brush.Color: TColor |
Définit la valeur de couleur du pinceau. |
property Brush.Style: TBrushStyle |
Spécifie le style du pinceau. Valeurs disponibles : bsSolid, bsClear, bsHorizontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross |
procedure Chord (X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer) |
Dessine un segment d'une ellipse dans le rectangle englobant (X1, Y1) - (X2, Y2). |
procedure CopyRect (destLeft, destTop, destRight, destBottom: integer; Canvas: TCanvas; srcLeft, srcTop, srcRight, srcBottom: integer |
Copie une image d'un Canvas avec une zone rectangulaire (srcLeft, srcTop, srcRight, srcBottom) vers le Canvas actuel dans une zone rectangulaire destLeft, destTop, destRight, destBottom |
procedure Draw (X, Y: Integer; Graphic: TGraphic) |
Rend l'objet graphique de sorte que le coin supérieur gauche de l'objet soit situé au point (X, Y). |
procedure Draw2 (X, Y: Integer; Graphic: TGraphic; Opacity: Byte) |
Rend l'objet graphique de sorte que le coin supérieur gauche de l'objet soit situé au point (X, Y). Le paramètre Opacity permet de définir le niveau de transparence (valeur de 0 à 255). |
procedure Ellipse (X1, Y1, X2, Y2: Integer) |
Dessine une ellipse dans le rectangle englobant (X1, Y1) - (X2, Y2). Remplit l'intérieur de l'ellipse avec le pinceau courant. |
property Font: TFont |
La propriété est responsable de l'apparence du texte qui peut être affiché à l'aide de la méthode TextOut. |
procedure LineTo (X, Y: Integer) |
Trace une ligne entre la position actuelle du stylet et le point (X, Y). L'emplacement actuel est défini par la méthode MoveTo. |
procedure MoveTo (X, Y: Integer) |
Déplace le stylet en position (X, Y) sans tracer de lignes. |
property Pen: TPen |
Une référence à l'objet stylo. Responsable de l'apparence des lignes. |
property Pen.Color: TColor |
Spécifie la valeur de couleur du crayon (couleur de la ligne). |
property Pen.Style: TPenStyle |
Spécifie le style du stylo (l'apparence des lignes). Valeurs disponibles : psSolid, psDash, psDot, psDashDot, psDashDotDot, psClear, psInsideFrame |
property Pen.Width: Integer |
Spécifie la largeur du crayon (largeur de ligne en pixels). |
procedure Pie (X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer) |
Dessine une tranche d'ellipse dans le rectangle englobant (X1, Y1) - (X2, Y2). |
property Pixels (X, Y: Integer): TColor |
|
procedure Rectangle (X1, Y1, X2, Y2: Integer) |
Dessine et remplit un rectangle. |
procedure RoundRect (X1, Y1, X2, Y2, X3, Y3: Integer) |
Dessine un rectangle rempli avec des bords arrondis; (x1, y1) et (x2, y2). X3 et Y3 spécifient la largeur et la hauteur de l'ellipse utilisée pour arrondir les bords. |
procedure TextOut (X, Y: Integer; const Text: string) |
Renvoie la chaîne de texte Texte de telle sorte que le point avec les coordonnées (x, y) se trouve dans le coin supérieur gauche de la première lettre. |
property Handle: Integer |
|
Exemple
Form1.Image1.Canvas.Brush.Style := bsClear;
Form1.Image1.Canvas.Font.Orientation := 270;
Form1.Image1.Canvas.MoveTo(50, 50);
Form1.Image1.Canvas.LineTo(100, 100);
Form1.Image1.Canvas.TextOut(150, 150, 'Тexte');
Form1.Image1.Canvas.Ellipse(30, 30, 45, 45);