THotPDF.RegisterCoonsPatchMesh-metodi

Ilmoittaa PDF 1.3+ Coons-patch -verkkovarjostuksen (ISO 32000-1 8.7.4.5.6, /ShadingType 6) ja käärii sen inline Pattern Type 2 -merkintään sivun Resources/Pattern-sanakirjassa. Kukin patch on rajattu neljällä kuutiollisella Bezier-käyrällä ja kuljettaa yhden värin kulmaa kohden; renderöijä sovittaa Coons-pinnan neljän reunan väliin, antaen mielivaltaisesti kaarevan väriä kantavan nelikulmion. Käytä tätä, kun suorakulmaiset kolmioverkot (RegisterFreeFormGouraudShading, RegisterLatticeFormGouraudShading) vaatisivat monia kolmioita kaarevien rajojen approksimoimiseksi - folio- ja metalligradientit taivutetuilla poluilla, SVG-pohjaiset gradienttiverkot ja kaikki kaarevilla reunoilla varustetut nelikulmiot

function RegisterCoonsPatchMesh(XMin, YMin, XMax, YMax: Single; NumComponents: Integer; const Patches: array of Extended): AnsiString;

AnsiString RegisterCoonsPatchMesh(float XMin, float YMin, float XMax, float YMax, int NumComponents, const Extended* Patches, int PatchesElementCount);

Varjostus tuotetaan epäsuorana virtana, jossa on /ShadingType 6, /BitsPerCoordinate 16, /BitsPerComponent 8 ja /BitsPerFlag 8. Jokainen paikka (patch) on pakattu 1 lipputavuna (aina 0 itsenäisille paikoille), jota seuraa 12 ohjauspistettä (kukin 4 tavua: 2 big-endian X + 2 big-endian Y) ja 4 kulmaväriä (kukin NumComponents tavua), yhteensä 1 + 48 + 4 * NumComponents tavua paikkaa kohden. /Decode-taulukko kartoittaa 16-bittiset koordinaatit takaisin annettuun [XMin, XMax] x [YMin, YMax] -käyttäjäavaruuden suorakulmioon ja kunkin värikomponentin takaisin arvoalueelle [0, 1]

Nämä 12 ohjauspistettä on numeroitu c1..c12 myötäpäivään alueen reunan ympäri alkaen kulmasta 1. Neljä kulmaa ovat c1 / c4 / c7 / c10, ja loput kahdeksan (c2, c3 välillä c1 ja c4; c5, c6 välillä c4 ja c7; c8, c9 välillä c7 ja c10; c11, c12 välillä c10 ja c1) ovat kunkin kuutiollisen reunan sisemmät Bezier-kahvat. Kun sisemmät kahvat sijaitsevat kohdissa 1/3 ja 2/3 vierekkäisten kulmien välisellä suoralla viivalla, Coons-pinta rappeutuu bilineaariseksi interpolaatioksi – visuaalisesti vastaten 4-kärkistä Type 4 -verkkoa

XMin, YMin, XMax, YMax - käyttäjäavaruuden suorakulmio, joka rajaa koodatut koordinaatit. Näistä neljästä arvosta tulee merkinnän /Decode neljä ensimmäistä syötettä. Ohjauspisteet tämän suorakulmion ulkopuolella rajataan koodausaikana. Sijoita ne samoihin käyttäjäavaruuden koordinaatteihin, joihin tulet piirtämään - HotPDF-näyttökoordinaattien suorakulmiolle Rectangle pisteessä (X, Y, W, H) sitä vastaava PDF-käyttäjäavaruuden suorakulmio on välillä (X, PageHeight - Y - H) - (X + W, PageHeight - Y)

NumComponents – värikomponenttien määrä kulmaa kohden. Välitä 1 arvolle DeviceGray, 3 arvolle DeviceRGB tai 4 arvolle DeviceCMYK. Mikä tahansa muu arvo aiheuttaa poikkeuksen

Patches - yksinkertainen Extended-arvojen taulukko. Jokainen paikka tuottaa 24 + 4 * NumComponents arvoa: 24 liukulukua 12 ohjauspisteelle (X, Y, X, Y, ..., 12 paria c1..c12 myötäpäivään järjestyksessä) ja sen jälkeen 4 * NumComponents liukulukua kulmaväreille (kulma 1 / 2 / 3 / 4 = c1 / c4 / c7 / c10 syklisessä järjestyksessä). Taulukon pituuden on oltava positiivinen tämän askeleen monikerta. Kaikki lähetetyt paikat kantavat lippua flag = 0 (itsenäinen paikka); jatkolippuja 1 / 2 / 3 (reunan jakaminen edellisen paikan kanssa) ei tuoda esille tässä mukavuusylikuormituksessa

Paluuarvo: automaattisesti luotu kuvion nimi (Sh1, Sh2, ...), joka on rekisteröity nykyisen sivun Resources/Pattern-sanakirjaan. Palauttaa tyhjän merkkijonon, kun StrictVersionLock on käytössä ja aktiivinen Version on alle PDF 1.3 (muussa tapauksessa dokumentin versio korotetaan automaattisesti arvoon 1.3)

Code Example

// 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;