There are some minor bugs in the demo.
Change the items in Combobox3 in the IDE to:
Solid
Clear
Horizontal
Vertical
Forward Diagonal
Backward Diagonal
Cross
Diagonal Cross
then change ComboBox4Change from:
const
BS: array[-1..7] of TBrushStyle = (bsSolid, bsSolid, bsClear, bsBDiagonal, bsFDiagonal, bsCross, bsDiagCross, bsHorizontal, bsVertical);
to:
const
BS: array[-1..7] of TBrushStyle = (bsSolid, bsSolid, bsClear, bsHorizontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross);
The indexes of the items in Combobox3 must match the indexes of the brush styles in ComboBox4Change BS (brush styles). There is an extra bsSolid item in the brush styles (BS) so that if no brush style is selected in Combobox3 the brush style will be set to bsSolid.
William Miller
Adirondack Software & Graphics
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html
Custom ImageEn Development