GdiPlus[26]: IGPPen: 用畫刷建立畫筆

Color 是畫筆的基本屬性, 比較有意思的是可以通過畫刷來建立畫筆.

　　五種畫刷都可以, 但使用實心畫刷就沒有意義了;

　　建立後, 通過畫筆的 PenType 能知道是通過什麼畫刷建立的; 也能通過 Brush 屬性獲取回畫刷.

　　下面的例子只是測試了通過陰影畫刷建立畫筆:

uses　GdiPlus,　GdiPlusHelpers;　
　
procedure　TForm1.FormPaint(Sender:　TObject);　
var　
　Pen:　IGPPen;　
　Brush:　IGPBrush;　
begin　
　Brush　:=　TGPHatchBrush.Create(HatchStyleShingle,　$FFFFFFFF　,　$FF0000FF);　
　Pen　:=　TGPPen.Create(Brush,　16);　
　Canvas.ToGPGraphics.DrawEllipse(Pen,　20,　20,　200,　100);　
end;