
rgn := TGPRegion.Create(MakeRect(40, 40, ClientWidth-80, ClientHeight-80));
g.FillRegion(b, rgn); // GDI+ 填充
handle := rgn.GetHRGN(g); // 轉 HRGN
Canvas.Brush.Color := clRed;
FrameRgn(Canvas.Handle, handle, Canvas.Brush.Handle, 2, 2); // GDI 畫邊框
DeleteObject(handle); // 必須釋放
展示 GDI+/GDI 互操作:區域建立填充用 GDI+,邊框繪製用 GDI FrameRgn。