Градиентная заливка нестандартного чертежа в C ++ Builder XE - PullRequest
1 голос
/ 29 июня 2011

Я нарисовал собственный чертеж в C ++ Builder XE с помощью приведенного ниже кода, но теперь я хочу заполнить его цветом градиентной заливки.

PaintBox1->Canvas->Pen->Color = RGB (187, 187, 187);

PaintBox1->Canvas->MoveTo(0, 8);
PaintBox1->Canvas->LineTo(10, 0);
PaintBox1->Canvas->LineTo(10, 5);
PaintBox1->Canvas->LineTo(21, 5);
PaintBox1->Canvas->MoveTo(0, 8);
PaintBox1->Canvas->LineTo(10, 15);
PaintBox1->Canvas->LineTo(10, 10);
PaintBox1->Canvas->LineTo(21, 10);
PaintBox1->Canvas->LineTo(21, 5);

1 Ответ

1 голос
/ 01 июля 2011

Вероятно, было бы проще всего использовать GradientFillCanvas с областью отсечения.Смотрите следующие ссылки:

http://docwiki.embarcadero.com/VCL/en/GraphUtil.GradientFillCanvas

http://www.delphigroups.info/2/12/324143.html

Так что вы бы сделали что-то вроде:

POINT polygon[8] = {{0,8},{10,0},{10,5},{21,5},{21,10},{10,10},{10,15},{0,8}};
HRGN rgn = CreatePolygonRgn( polygon, 8, WINDING );
SelectClipRgn(PaintBox1->Canvas.Handle, rgn);
TRect gradientRect(0,0,21,15);
GradientFillCanvas( PaintBox1->Canvas, start_color, end_color, gradientRect, gradient_direction );
SelectClipRgn(PaintBox1->Canvas.Handle, NULL);
DeleteObject(rgn);
//the polygon could also be drawn instead of using LineTo
PaintBox1->Canvas->Polygon( polygon, 8 );
...