function GetObjectRenderedStrokePattern(Index: Integer): TBitmap;
| Index | Integer. Index d’objet de page à partir de zéro, dans la plage 0 .. ObjectCount - 1 |
| Result | TBitmap. Un bitmap fraîchement créé, dont l’appelant est propriétaire et doit assurer la libération, ou nil quand l’objet n’est pas tracé avec un motif de pavage, que l’export natif est absent ou que le rendu échoue |
Un objet chemin dont l’espace de couleur de tracé est /Pattern avec un motif PatternType 1 (pavage) peint son contour avec une cellule répétée plutôt qu’avec une couleur unie. Cette méthode rend cette cellule isolément via l’export natif FPDFPageObj_GetRenderedStrokePattern, si bien que l’appelant peut inspecter, exporter ou prévisualiser le motif sans rendre la page entière
Le verrou de rendu est maintenu pendant l’appel natif : l’opération est donc sûre face à un rendu concurrent sur le même composant. Le bitmap natif est converti puis détruit avant le retour ; le TBitmap obtenu appartient à l’appelant
L’appel exige que la page courante soit active. Les objets qui ne sont pas des chemins, les chemins tracés avec une couleur unie ou un motif de shading, et les motifs réservés au remplissage renvoient tous nil plutôt qu’une exception ; utilisez PageObjectInfo ou PathInfo pour en savoir plus
Les motifs de pavage colorés (PaintType 1) se rendent avec leurs propres couleurs ; les motifs non colorés (PaintType 2) se rendent avec la couleur de tracé choisie par le flux de contenu
nil signifie « pas de motif » ou « pas d’export »
var
I: Integer;
Bmp: TBitmap;
begin
for I := 0 to Pdf1.ObjectCount - 1 do
begin
Bmp := Pdf1.GetObjectRenderedStrokePattern(I);
if Bmp <> nil then
try
Bmp.SaveToFile(Format('stroke-pattern-%d.bmp', [I]));
finally
Bmp.Free;
end;
end;
end;