|
Erklærer en PDF 1.3+ Coons patch mesh shading (ISO 32000-1 8.7.4.5.6,/ShadingType 6) og pakker det ind i en indlejret Pattern Type 2-post på sidensResources/Patternordbog; hver patch er afgrænset af fire kubiske Bezier-kurver og bærer én farve pr. hjørne; gengiveren tilpasser Coons-overfladen mellem de fire kanter, hvilket giver en vilkårligt buet farvebærende quad; brug dette, når trekantnet med lige kanter (RegisterFreeFormGouraudShading, RegisterLatticeFormGouraudShading) ville have brug for mange trekanter til at tilnærme sig buede grænser - folie- og metalforløb på bøjede stier, SVG-afledte gradientnet og enhver quad med buede kanter
Delphi-syntaks:
function RegisterCoonsPatchMesh(XMin, YMin, XMax, YMax: Single; NumComponents: Integer;constPatches:array ofExtended): AnsiString;
C++-syntaks:
AnsiString RegisterCoonsPatchMesh(float XMin, float YMin, float XMax, float YMax, int NumComponents, const Extended* Patches, int PatchesElementCount);
Beskrivelse
Skyggelægningen udsendes som en indirekte strøm med/ShadingType 6, /BitsPerCoordinate 16, /BitsPerComponent 8 and /BitsPerFlag 8; hver patch er pakket som 1 flag-byte (altid 0 for uafhængige patches) efterfulgt af 12 kontrolpunkter (hver 4 bytes: 2 big-endian X + 2 big-endian Y) og 4 hjørnefarver (hver NumComponents bytes), i alt1 + 48 + 4 * NumComponentsbytes pr. patch; den/Decodearray kortlægger de 16-bit koordinater tilbage til det leverede[XMin, XMax] x [YMin, YMax]user-space-rektangel og hver farvekomponent tilbage til[0, 1].
De 12 kontrolpunkter er nummereret c1..c12 med uret rundt om patch-grænsen startende fra hjørne 1; de fire hjørner er c1 / c4 / c7 / c10, og de resterende otte (c2, c3 mellem c1 og c4; c5, c6 mellem c4 og c7; c8, c9 mellem c7 og c10; c11, c12 mellem c10 og c1) are de indre Bezier-håndtag for hver kubisk kant; når de indre håndtag sidder ved 1/3 og 2/3 ad den rette linje mellem tilstødende hjørner, degenererer Coons-overfladen til bilineær interpolation - visuelt svarende til et 4-vejspunkts Type 4-net
XMin, YMin, XMax, YMax - user-space-rektanglet, der afgrænser de kodede koordinater; disse fire værdier bliver de første fire poster i/Decode; kontrolpunkter uden for dette rektangel fastklemmes på kodningstidspunktet; placer dem i de samme user-space-koordinater, som du vil tegne i - for HotPDF's skærmkoordinaterRectangle at (X, Y, W, H)er det matchende PDF-user-space-rektangel(X, PageHeight - Y - H) to (X + W, PageHeight - Y).
NumComponents - antal farvekomponenter pr. hjørne; overfør1for DeviceGray,3for DeviceRGB eller4for DeviceCMYK; enhver anden værdi udløser en undtagelse
Patches - fladt array afExtendedværdier; hver patch bidrager med24 + 4 * NumComponentsværdier: 24 floats for de 12 kontrolpunkter (X, Y, X, Y, ..., 12 par i c1..c12-rækkefølge med uret) efterfulgt af4 * NumComponentsfloats for hjørnefarverne (hjørne 1 / 2 / 3 / 4 = c1 / c4 / c7 / c10 i cyklisk rækkefølge); array-længden skal være et positivt multiplum af dette skridt; alle udsendte patches bærer flag = 0 (uafhængig patch); fortsættelsesflag 1 / 2 / 3 (kantdeling med den forrige patch) er ikke eksponeret i denne bekvemmelighedsoverbelastning
Returværdi: et autogenereret mønsternavn (Sh1, Sh2, ...) registreret på den aktuelle sidesResources/Patternordbog; returnerer en tom streng, nårStrictVersionLocker slået til og den aktiveVersioner under PDF 1.3 (ellers opgraderes dokumentversionen automatisk til 1.3)
Kodeeksempel
// Single straight-edge Coons patch covering a 200x200 quad. Inner
// control points placed at 1/3 / 2/3 along each edge => bilinear
// surface. Four corner colours = red / green / yellow / blue
var
Doc: THotPDF;
PatName: AnsiString;
Patches: array[0..35] of Extended; // 12 ctrl pts * 2 + 4 corners * 3 = 36
H, XMin, YMin, XMax, YMax, W: Single;
begin
Doc := THotPDF.Create(nil);
try
Doc.Version := pdf14;
Doc.BeginDoc;
H := Doc.CurrentPage.Height;
XMin := 0; YMin := H - 200; XMax := 200; YMax := H;
W := 200;
// c1..c12 clockwise. Inner handles at 1/3 / 2/3 => straight edges
Patches[ 0] := XMin; Patches[ 1] := YMax; // c1 TL
Patches[ 2] := XMin + W / 3; Patches[ 3] := YMax; // c2
Patches[ 4] := XMin + 2*W / 3; Patches[ 5] := YMax; // c3
Patches[ 6] := XMax; Patches[ 7] := YMax; // c4 TR
Patches[ 8] := XMax; Patches[ 9] := YMax - W / 3; // c5
Patches[10] := XMax; Patches[11] := YMax - 2*W / 3; // c6
Patches[12] := XMax; Patches[13] := YMin; // c7 BR
Patches[14] := XMax - W / 3; Patches[15] := YMin; // c8
Patches[16] := XMax - 2*W / 3; Patches[17] := YMin; // c9
Patches[18] := XMin; Patches[19] := YMin; // c10 BL
Patches[20] := XMin; Patches[21] := YMin + W / 3; // c11
Patches[22] := XMin; Patches[23] := YMin + 2*W / 3; // c12
// 4 corner colours (c1 / c4 / c7 / c10)
Patches[24] := 1.0; Patches[25] := 0.0; Patches[26] := 0.0; // red
Patches[27] := 0.0; Patches[28] := 1.0; Patches[29] := 0.0; // green
Patches[30] := 1.0; Patches[31] := 1.0; Patches[32] := 0.0; // yellow
Patches[33] := 0.0; Patches[34] := 0.0; Patches[35] := 1.0; // blue
PatName := Doc.RegisterCoonsPatchMesh(XMin, YMin, XMax, YMax, 3, Patches);
Doc.CurrentPage.SetFillPattern(PatName);
Doc.CurrentPage.Rectangle(0, 0, 200, 200);
Doc.CurrentPage.Fill;
Doc.EndDoc;
finally
Doc.Free;
end;
end;
Se også
RegisterFreeFormGouraudShading, RegisterLatticeFormGouraudShading, RegisterDeviceN, Version, PDF-filterunderstøttelse
|