Здравствуйте.
Как сделать заливку аналогичную VCL, как при использовании стилей TBrushStyle
TBrushStyle = (bsSolid, bsClear, bsHorizontal, bsVertical,
bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross);
Должна быть возможность задать цвет линий (штриховки)