THotPDF.RegisterLatticeFormGouraudShading Method

PDF 1.3 以降の lattice-form Gouraud シェーディング三角形メッシュ（ISO 32000-1 8.7.4.5.5、/ShadingType 5）を宣言し、ページの Resources/Pattern 辞書内のインライン Pattern Type 2 エントリでラップします。レンダラーが隣接する 2 行ごとに三角形ストリップへ自動的に三角形分割するため、呼び出し側が渡すのは頂点グリッドだけで済みます。元データがすでに規則的なサンプルグリッド上にある場合（地形、FEA の結果、科学系ヒートマップなど）に便利です。三角形分割が不規則で、三角形ごとのフラグが必要な場合は、代わりに RegisterFreeFormGouraudShading を使用してください

function RegisterLatticeFormGouraudShading(XMin, YMin, XMax, YMax: Single; NumComponents: Integer; VerticesPerRow: Integer; const Vertices: array of Extended): AnsiString;

AnsiString RegisterLatticeFormGouraudShading(float XMin, float YMin, float XMax, float YMax, int NumComponents, int VerticesPerRow, const Extended* Vertices, int VertexElementCount);

シェーディングは、/ShadingType 5、/BitsPerCoordinate 16、/BitsPerComponent 8、/VerticesPerRow N を備えた間接ストリームとして出力されます。Type 4 と違い、頂点ごとのフラグバイトはなく、シェーディングディクショナリーに /BitsPerFlag は存在しません。各頂点は 4 + NumComponents バイト（2 バイトのビッグエンディアン X + 2 バイトのビッグエンディアン Y + N 個のカラーコンポーネント）を占有します。/Decode 配列は 16 ビットの座標を指定された [XMin, XMax] x [YMin, YMax] のユーザー空間矩形へ、各カラーコンポーネントを [0, 1] へ写像し戻します

頂点は行優先で並べます。最初の VerticesPerRow 個の頂点が行 0 を、次の VerticesPerRow 個が行 1 を作り、以降同様です。レンダラーは隣接する行のペア（行 i と行 i+1）を三角形ストリップに接続します。フラグも明示的な三角形リストもありません。Vertices に渡す Extended 値の数は (2 + NumComponents) * VerticesPerRow の倍数でなければならず、結果として得られる行数は 2 以上が必要です

XMin, YMin, XMax, YMax - ラティスを囲むユーザー空間の矩形です。この 4 つの値が /Decode の先頭 4 エントリーになります。これから塗り込むのと同じユーザー空間座標に置いてください。HotPDF のスクリーン座標の Rectangle が (X, Y, W, H) のとき、対応する PDF ユーザー空間の矩形は (X, PageHeight - Y - H) から (X + W, PageHeight - Y) です

NumComponents - 頂点ごとのカラーコンポーネント数です。DeviceGray には 1、DeviceRGB には 3、DeviceCMYK には 4 を渡します。それ以外の値は例外を発生させます

VerticesPerRow - ラティス 1 行あたりの頂点数 N で、N >= 2 です。ディクショナリーエントリー /VerticesPerRow はこの値をそのまま受け取ります。行数 M は配列長から VertexCount / VerticesPerRow として推定され、2 以上でなければなりません

Vertices - 頂点ごとに (X, Y, c1...cN) の順で並ぶ Extended 値のフラット配列で、行優先（行 0、次に行 1、...）に繰り返します。座標は [XMin, XMax] x [YMin, YMax] にクランプされ 16 ビット整数へ量子化され、カラーコンポーネントは [0, 1] にクランプされ 8 ビット整数へ量子化されます

戻り値: 自動生成のパターン名（Sh1、Sh2、...）。現在のページの Resources/Pattern 辞書に登録されます。StrictVersionLock がオンで、有効な Version が PDF 1.3 未満の場合は空文字列を返します（それ以外の場合、ドキュメントのバージョンは 1.3 に自動で引き上げられます）

コード例

// 200x200 の四角形の上に 3x3 のラティスを置きます。レンダラーは
// 隣接する行を三角形ストリップへ自動三角形化し、4 セル x 2 三角形
// = 8 三角形になります。色の配置（イメージ）：
//
//   行 0（上、Y=YMax）：赤     黄      緑
//   行 1（中）：        マゼンタ グレー  シアン
//   行 2（下、Y=YMin）：青     紫      オレンジ
var
  Doc: THotPDF;
  PatName: AnsiString;
  Verts: array[0..44] of Extended;   // 9 頂点 x 各 5 float
  H, XMin, YMin, XMax, YMax, XMid, YMid: 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;
    XMid := (XMin + XMax) / 2;
    YMid := (YMin + YMax) / 2;
    // 行 0（Y=YMax）：赤 - 黄 - 緑
    Verts[ 0] := XMin; Verts[ 1] := YMax; Verts[ 2] := 1.0; Verts[ 3] := 0.0; Verts[ 4] := 0.0;
    Verts[ 5] := XMid; Verts[ 6] := YMax; Verts[ 7] := 1.0; Verts[ 8] := 1.0; Verts[ 9] := 0.0;
    Verts[10] := XMax; Verts[11] := YMax; Verts[12] := 0.0; Verts[13] := 1.0; Verts[14] := 0.0;
    // 行 1（Y 中間）：マゼンタ - グレー - シアン
    Verts[15] := XMin; Verts[16] := YMid; Verts[17] := 1.0; Verts[18] := 0.0; Verts[19] := 1.0;
    Verts[20] := XMid; Verts[21] := YMid; Verts[22] := 0.5; Verts[23] := 0.5; Verts[24] := 0.5;
    Verts[25] := XMax; Verts[26] := YMid; Verts[27] := 0.0; Verts[28] := 1.0; Verts[29] := 1.0;
    // 行 2（Y=YMin）：青 - 紫 - オレンジ
    Verts[30] := XMin; Verts[31] := YMin; Verts[32] := 0.0; Verts[33] := 0.0; Verts[34] := 1.0;
    Verts[35] := XMid; Verts[36] := YMin; Verts[37] := 0.5; Verts[38] := 0.0; Verts[39] := 0.5;
    Verts[40] := XMax; Verts[41] := YMin; Verts[42] := 1.0; Verts[43] := 0.5; Verts[44] := 0.0;
    PatName := Doc.RegisterLatticeFormGouraudShading(
      XMin, YMin, XMax, YMax, 3, 3, Verts);
    Doc.CurrentPage.SetFillPattern(PatName);
    Doc.CurrentPage.Rectangle(0, 0, 200, 200);
    Doc.CurrentPage.Fill;
    Doc.EndDoc;
  finally
    Doc.Free;
  end;
end;