BGRABitmap tutorial Font rendering/fr: what changed
Revision 2 to 3. Removed lines have a minus sign; added lines have a plus sign.
| Old | New | Line | |
|---|---|---|---|
| 1 | - | ||
| 2 | - | ||
| 3 | - | ||
| 4 | - | ||
| 5 | - | ||
| 1 | + | Des fonctions de texte de base sont disponibles avec les objets *TBGRABitmap*. Vous trouverez des explications à ce sujet dans le [[BGRABitmap tutorial 12/fr|tutoriel 12]]. | |
| 6 | 2 | ||
| 7 | - | ||
| 8 | - | ||
| 9 | - | ||
| 10 | - | ||
| 11 | - | ||
| 3 | + | Voyons les façons avancées de dessiner du texte. | |
| 12 | 4 | ||
| 13 | 5 | ### La propriété FontRenderer | |
| 14 | 6 | ||
| 15 | - | ||
| 7 | + | Les images *TBGRABitmap* ont une propriété *FontRenderer*. Par défaut, le moteur de rendu utilisant le dessin de la LCL est utilisé, éventuellement en dessinant le texte plus gros et en appliquant un anticrénelage. Cela est réalisé par la classe *TLCLFontRenderer* de l'unité *BGRAText*. Cependant, ce mode de dessin ne permet pas de faire des ombrage ou de dessiner un contour au texte. De plus, il est un peu lent pour dessiner du texte dans un rectangle (fonction *TextRect*). | |
| 16 | 8 | ||
| 17 | - | ||
| 9 | + | Vous pouvez remplacer le moteur de rendu en créant un objet dérivé de la classe *TBGRACustomFontRenderer* et en l'affectant à la propriété *FontRenderer*. Notez qu'une instance ne peut être utilisée que pour un seul objet, qui en devient le propriétaire. Vous n'avez alors pas à libérer vous-même le moteur de rendu. | |
| 18 | 10 | ||
| 19 | 11 | #### Ajouter des effets | |
| 20 | 12 | ||
| 21 | - | ||
| 22 | - | ||
| 13 | + | Pour améliorer la vitesse du rendu et ajouter des effets, vous aurez besoin de la classe *TBGRATextEffectFontRenderer* qui se trouve dans l'unité *BGRATextFX*. Pour cela, écrivez simplement ceci : | |
| 14 | + | ||
| 15 | + | ``` pascal | |
| 23 | 16 | Uses BGRABitmap, BGRATextFX; | |
| 24 | - | ||
| 25 | - | ||
| 26 | - | ||
| 27 | - | ||
| 28 | - | ||
| 29 | - | ||
| 30 | - | ||
| 31 | - | ||
| 17 | + | ||
| 18 | + | var Bitmap: TBGRABitmap; | |
| 19 | + | Renderer: TBGRATextEffectFontRenderer; | |
| 20 | + | ||
| 21 | + | begin | |
| 22 | + | ... | |
| 23 | + | Renderer := TBGRATextEffectFontRenderer.Create; | |
| 24 | + | Bitmap.FontRenderer := Renderer; | |
| 32 | 25 | ``` | |
| 33 | 26 | ||
| 34 | - | ||
| 27 | + | Notez que vous pourriez affecter directement l'objet créé sans passer par la variable *Renderer*, mais cette dernière va vous permettre de choisir les effets appliqués. | |
| 35 | 28 | ||
| 36 | - | ||
| 37 | - | ||
| 29 | + | - Pour l'ombrage, utilisez les propriétés *ShadowVisible*, *ShadowColor*, *ShadowOffset* et *ShadowRadius*. Pour qu'une ombre soit visible, il faut que *ShadowVisible* soit à *True* et que *ShadowColor* ne soit pas transparent. | |
| 30 | + | - Pour ajouter un contour, utilisez *OutlineVisible*, *OuterOutlineOnly*, *OutlineColor* ou *OutlineTexture* et *OutlineWidth*. Pour qu'un contour soit visible, il faut que *OutlineVisible* soit à *True*, et qu'une texture soit définie ou sinon une couleur non transparente. De plus, *OutlineWidth* ne doit pas être égal à zéro. | |
| 38 | 31 | ||
| 39 | - | ||
| 40 | - | ||
| 32 | + | Par exemple, définissez l'événement *OnPaint* en double-cliquant dans l'inspecteur d'objet d'une fenêtre et écrivez : | |
| 33 | + | ||
| 34 | + | ``` pascal | |
| 41 | 35 | Uses BGRABitmap, BGRABitmapTypes, BGRATextFX; | |
| 42 | - | ||
| 43 | - | ||
| 44 | - | ||
| 45 | - | ||
| 46 | - | ||
| 47 | - | ||
| 48 | - | ||
| 49 | - | ||
| 50 | - | ||
| 51 | - | ||
| 52 | - | ||
| 53 | - | ||
| 54 | - | ||
| 55 | - | ||
| 56 | - | ||
| 57 | - | ||
| 58 | - | ||
| 59 | - | ||
| 36 | + | ||
| 37 | + | procedure TForm1.FormPaint(Sender: TObject); | |
| 38 | + | var | |
| 39 | + | bmp: TBGRABitmap; | |
| 40 | + | renderer: TBGRATextEffectFontRenderer; | |
| 41 | + | begin | |
| 42 | + | bmp := TBGRABitmap.Create(ClientWidth,ClientHeight,ColorToRGB(clBtnFace)); | |
| 43 | + | renderer := TBGRATextEffectFontRenderer.Create; | |
| 44 | + | bmp.FontRenderer := renderer; | |
| 45 | + | renderer.ShadowVisible := True; | |
| 46 | + | renderer.OutlineVisible := True; | |
| 47 | + | renderer.OutlineColor := BGRABlack; | |
| 48 | + | renderer.OuterOutlineOnly := True; | |
| 49 | + | bmp.FontFullHeight := 50; | |
| 50 | + | bmp.TextOut(5,5,'Hello world',CSSRed); | |
| 51 | + | bmp.Draw(Canvas,0,0); | |
| 52 | + | bmp.Free; | |
| 53 | + | end; | |
| 60 | 54 | ``` | |
| 61 | 55 | ||
| 62 | - | ||
| 56 | + |  | |
| 63 | 57 | ||
| 64 | - | ||
| 65 | - | ||
| 66 | - | ||
| 58 | + | Notez que l'anticrénelage n'est pas activé. Vous pouvez le faire avec : | |
| 59 | + | ||
| 60 | + | ``` pascal | |
| 61 | + | bmp.FontQuality:= fqFineAntialiasing; | |
| 67 | 62 | ``` | |
| 68 | 63 | ||
| 69 | - | ||
| 64 | + |  | |
| 70 | 65 | ||
| 71 | 66 | ##### Utiliser un éclairage de Phong | |
| 72 | 67 | ||
| 73 | - | ||
| 74 | - | ||
| 68 | + | Pour avoir un éclairage de Phong, vous aurez besoin d'un *shader*. Pour le créer : | |
| 69 | + | ||
| 70 | + | ``` pascal | |
| 75 | 71 | uses BGRAGradients; | |
| 76 | - | ||
| 77 | - | ||
| 78 | - | ||
| 79 | - | ||
| 80 | - | ||
| 81 | - | ||
| 72 | + | var | |
| 73 | + | shader: TPhongShading; | |
| 74 | + | renderer: TBGRATextEffectFontRenderer; | |
| 75 | + | begin | |
| 76 | + | shader := TPhongShading.Create; | |
| 77 | + | renderer := TBGRATextEffectFontRenderer.Create(shader, True); //le deuxième paramètre indique que le shader appartient au moteur de rendu | |
| 82 | 78 | ``` | |
| 83 | 79 | ||
| 84 | - | ||
| 85 | - | ||
| 80 | + | L'exemple au complet, en utilisant un ombrage, devient : | |
| 81 | + | ||
| 82 | + | ``` pascal | |
| 86 | 83 | uses BGRABitmap, BGRABitmapTypes, BGRATextFX, BGRAGradients; | |
| 87 | - | ||
| 88 | - | ||
| 89 | - | ||
| 90 | - | ||
| 91 | - | ||
| 92 | - | ||
| 93 | - | ||
| 94 | - | ||
| 95 | - | ||
| 96 | - | ||
| 97 | - | ||
| 98 | - | ||
| 99 | - | ||
| 100 | - | ||
| 84 | + | ||
| 85 | + | procedure TForm1.FormPaint(Sender: TObject); | |
| 86 | + | var bmp: TBGRABitmap; | |
| 87 | + | shader: TPhongShading; | |
| 88 | + | renderer: TBGRATextEffectFontRenderer; | |
| 89 | + | begin | |
| 90 | + | bmp := TBGRABitmap.Create(ClientWidth,ClientHeight,ColorToRGB(clBtnFace)); | |
| 91 | + | shader := TPhongShading.Create; | |
| 92 | + | renderer := TBGRATextEffectFontRenderer.Create(shader,True); | |
| 93 | + | bmp.FontRenderer := renderer; | |
| 94 | + | renderer.ShadowVisible := True; | |
| 95 | + | bmp.FontFullHeight := 50; | |
| 96 | + | bmp.FontQuality:= fqFineAntialiasing; | |
| 97 | + | bmp.TextOut(5,5,'Hello world',CSSRed); | |
| 101 | 98 | ``` | |
| 102 | 99 | ||
| 103 | - | ||
| 100 | + |  | |
| 104 | 101 | ||
| 105 | 102 | #### Utiliser les polices avec LazFreeType intégré à Lazarus | |
| 106 | 103 | ||
| 107 | - | ||
| 104 | + | Depuis la version 1.0 de Lazarus, un moteur de police FreeType est intégré à Lazarus. Notez que vous devez fournir vous-même les fichiers ou les flux contenant les polices que vous voulez afficher. Les répertoires du système et les polices installées sont ignorés, à moins bien entendu que vous ajoutiez explicitement ces fichiers. Notez que dans l'implémentation actuelle, il est nécessaire de fournir la police Arial même si vous ne l'utilisez pas. | |
| 108 | 105 | ||
| 109 | - | ||
| 110 | - | ||
| 106 | + | Afin de définir les polices, écrivez ceci lors de la création de votre application : | |
| 107 | + | ||
| 108 | + | ``` pascal | |
| 111 | 109 | uses LazFreeTypeFontCollection; | |
| 112 | - | ||
| 113 | - | ||
| 114 | - | ||
| 115 | - | ||
| 116 | - | ||
| 117 | - | ||
| 118 | - | ||
| 119 | - | ||
| 120 | - | ||
| 121 | - | ||
| 122 | - | ||
| 123 | - | ||
| 124 | - | ||
| 125 | - | ||
| 126 | - | ||
| 127 | - | ||
| 128 | 110 | ||
| 129 | - | ||
| 111 | + | var FFontCollection: TFreeTypeFontCollection; | |
| 112 | + | ||
| 113 | + | procedure TForm1.FormCreate(Sender: TObject); | |
| 114 | + | begin | |
| 115 | + | FFontCollection := TFreeTypeFontCollection.Create; | |
| 116 | + | FFontCollection.AddFile('Arial.ttf'); //en supposant que le fichier se trouve à coté de l'application | |
| 117 | + | SetDefaultFreeTypeFontCollection(FFontCollection); | |
| 118 | + | end; | |
| 119 | + | ||
| 120 | + | procedure TForm1.FormDestroy(Sender: TObject); | |
| 121 | + | begin | |
| 122 | + | SetDefaultFreeTypeFontCollection(nil); | |
| 123 | + | FreeAndNil(FFontCollection); | |
| 124 | + | end; | |
| 130 | 125 | ``` | |
| 126 | + | ||
| 127 | + | À présent, pour utiliser ces polices, définissez la propriété *FontRenderer* : | |
| 128 | + | ||
| 129 | + | ``` pascal | |
| 131 | 130 | uses BGRABitmap, BGRABitmapTypes, BGRAFreeType; | |
| 132 | - | ||
| 133 | - | ||
| 134 | - | ||
| 135 | - | ||
| 136 | - | ||
| 137 | - | ||
| 138 | - | ||
| 139 | - | ||
| 140 | - | ||
| 141 | - | ||
| 142 | - | ||
| 143 | - | ||
| 144 | - | ||
| 145 | - | ||
| 146 | - | ||
| 147 | - | ||
| 131 | + | ||
| 132 | + | procedure TForm1.FormPaint(Sender: TObject); | |
| 133 | + | var | |
| 134 | + | bmp: TBGRABitmap; | |
| 135 | + | renderer: TBGRAFreeTypeFontRenderer; | |
| 136 | + | begin | |
| 137 | + | bmp := TBGRABitmap.Create(ClientWidth,ClientHeight,ColorToRGB(clBtnFace)); | |
| 138 | + | renderer := TBGRAFreeTypeFontRenderer.Create; | |
| 139 | + | bmp.FontRenderer := renderer; | |
| 140 | + | bmp.FontName := 'Arial'; | |
| 141 | + | bmp.FontFullHeight:= 50; | |
| 142 | + | bmp.FontQuality := fqFineClearTypeRGB; | |
| 143 | + | bmp.TextOut(10,10,'Hello world',BGRABlack); | |
| 144 | + | bmp.Draw(Canvas,0,0); | |
| 145 | + | bmp.Free; | |
| 146 | + | end; | |
| 148 | 147 | ``` | |
| 149 | 148 | ||
| 150 | - | ||
| 149 | + |  | |
| 151 | 150 | ||
| 152 | - | ||
| 153 | - | ||
| 154 | - | ||
| 151 | + | Vous pouvez ajouter une ombre avec la propriété *Shadow* : | |
| 152 | + | ||
| 153 | + | ``` pascal | |
| 154 | + | renderer.ShadowVisible := True; | |
| 155 | 155 | ``` | |
| 156 | 156 | ||
| 157 | - | ||
| 157 | + |  | |
| 158 | 158 | ||
| 159 | - | ||
| 160 | - | ||
| 161 | - | ||
| 162 | - | ||
| 163 | - | ||
| 159 | + | Pour ajouter un contour : | |
| 160 | + | ||
| 161 | + | ``` pascal | |
| 162 | + | renderer.OutlineVisible := True; | |
| 163 | + | renderer.OutlineColor := CSSBlack; | |
| 164 | + | renderer.OuterOutlineOnly := True; | |
| 164 | 165 | ``` | |
| 165 | 166 | ||
| 166 | - | ||
| 167 | + |  | |
| 167 | 168 | ||
| 168 | 169 | ##### Éclairage de Phong | |
| 169 | 170 | ||
| 170 | - | ||
| 171 | - | ||
| 171 | + | Pour avoir un éclairage de Phong, vous aurez besoin d'un *shader*. Pour le créer : | |
| 172 | + | ||
| 173 | + | ``` pascal | |
| 172 | 174 | uses BGRAGradients; | |
| 173 | - | ||
| 174 | - | ||
| 175 | - | ||
| 176 | - | ||
| 177 | - | ||
| 178 | - | ||
| 175 | + | var | |
| 176 | + | shader: TPhongShading; | |
| 177 | + | renderer: TBGRAFreeTypeFontRenderer; | |
| 178 | + | begin | |
| 179 | + | shader := TPhongShading.Create; | |
| 180 | + | renderer := TBGRAFreeTypeFontRenderer.Create(shader, True); //le deuxième paramètre indique que le shader appartient au moteur de rendu | |
| 179 | 181 | ``` | |
| 180 | 182 | ||
| 181 | - | ||
| 183 | + |  | |
| 182 | 184 | ||
| 183 | 185 | --- | |
| 184 | - | ||
| 186 | + | *From the Free Pascal wiki, page "BGRABitmap tutorial Font rendering/fr", as it stood on 2020-02-10 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* | |
| 187 | + | Category: Français |
