Printer.Canvas.TextOutRésolu

Question

Bonjour,


Je voudrais imprimer une image avec du texte en dessus, pour celà j'ai utilisé Printer.Canvas.TextOut pour le texte et Printer.Canvas.Draw pour l'image. Mais le text apparait avec un fond blanc.

Comment enlever le fond blanc ?

Merci.

Walid_Delphi

Cirec · Accepted Answer

Salut,


essaye comme ceci :
Printer.Canvas.Draw(...); // Dessine l'image
Printer.Canvas.Brush.Style := bsClear; // met le fond transparent
Printer.Canvas.TextOut( ...); // Ecrit le texte














@+
Cirec

walid_kerkoub2006 · Answer

Je vous remercie énormément c'est bon ça a marché c'était bien cett propriété Printer.Canvas.Brush.Style :=  bsClear

juste un autre truc je voudrais déssiner une ligne donc j'utilise  Printer.Canvas.LineTo(x,y)  qui est une fonction pour déssiner une ligne de la position actuelle du crayon jusqu'au point (x,y). Mais pour changer la position du crayon (point début de la droite) il faut utiliser Printer.Canvas.PenPos qui est au format TPoint.
Comment affecter une valeur à Printer.Canvas.PenPos: =? (la maniére d'écriture)

Merci.

Walid_Delphi

Cirec · Answer

Printer.Canvas.PenPos := TPoint( 20, 50);
Mais jutiliserais plutôt :
Printer.Canvas.MoveTo(20, 50);

@+
Cirec

walid_kerkoub2006 · Answer

Merci.

Walid_Delphi

Printer.Canvas.TextOut

4 réponses

Votre réponse

Discussions similaires