function GetObjectRenderedStrokePattern(Index: Integer): TBitmap;
| Index | Integer. Índice de objeto de página baseado em zero, no intervalo 0 .. ObjectCount - 1 |
| Result | TBitmap. Um bitmap recém-criado, de propriedade do chamador e liberado por ele, ou nil quando o objeto não traça o contorno com um tiling pattern, a exportação nativa não existe ou a renderização falha |
Um objeto de caminho cujo espaço de cor de traço é /Pattern com um pattern PatternType 1 (tiling) pinta o contorno com uma célula repetida em vez de uma cor sólida. Este método renderiza essa célula isoladamente por meio da exportação nativa FPDFPageObj_GetRenderedStrokePattern, assim o chamador pode inspecionar, exportar ou pré-visualizar o pattern sem renderizar a página inteira
O render lock é mantido durante a chamada nativa, então a chamada é segura contra renderização concorrente no mesmo componente. O bitmap nativo é convertido e destruído antes do retorno; o TBitmap resultante pertence ao chamador
A chamada exige que a página atual esteja ativa. Objetos que não são caminhos, caminhos traçados com cor simples ou com um shading pattern e patterns apenas de preenchimento devolvem nil em vez de uma exceção; use PageObjectInfo ou PathInfo para descobrir o motivo
Tiling patterns coloridos (PaintType 1) são renderizados com suas próprias cores; patterns sem cor (PaintType 2) são renderizados com a cor de traço que o content stream selecionou
nil significa "sem pattern" ou "sem exportação"
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;