Delphi GDI+ 學習筆記 (5)：CompoundPen 復合畫筆 (多平行線)

單筆劃出多條平行線：SetCompoundArray 定義線段佔比陣列

SetCompoundArray 接受 Single 陣列 (長度為偶數)，每對值代表一條線在筆寬百分比中的起始/結束位置 (0.0~1.0)。可繪製五線譜、雙線邊框、多軌軌道等效果。

範例：五線譜 (5 條線，各佔 1% 寬度，間距 9%)

arr[0] := 0.00; arr[1] := 0.01; // 第1線
arr[2] := 0.10; arr[3] := 0.11; // 第2線
arr[4] := 0.20; arr[5] := 0.21; // 第3線
arr[6] := 0.30; arr[7] := 0.31; // 第4線
arr[8] := 0.40; arr[9] := 0.41; // 第5線
p.SetCompoundArray(@arr, Length(arr));
g.DrawLine(p, 11, 66, 333, 66);

參數規則

• 陣列長度必須為偶數 (成對)
• 每對值：start < end，範圍 [0.0, 1.0]
• 對應筆寬百分比位置：0.0 = 邊緣，1.0 = 另一邊緣
• 線條之間自動留白 (gap = next_start - prev_end)

應用場景

• 音樂五線譜、吉他六線譜
• 雙線/三線邊框 (表格、面板)
• 多軌道視覺化 (音訊、物流、鐵路)
• 技術圖紙平行線群

復合畫筆以單一繪圖指令產生多條平行線，效能遠優於迴圈繪製。