find-or-create-brush

Finds a brush of the given specification, or creates one and adds it to the list.

• (send a-brush-list find-or-create-brush color style) -> brush% object
      color : color% object
      style : symbol in '(transparent solid opaque xor bdiagonal-hatch crossdiag-hatch fdiagonal-hatch cross-hatch horizontal-hatch vertical-hatch)

  See brush%.

  
  

• (send a-brush-list find-or-create-brush color-name style) -> brush% object or #f
      color-name : string
      style : symbol in '(transparent solid opaque xor bdiagonal-hatch crossdiag-hatch fdiagonal-hatch cross-hatch horizontal-hatch vertical-hatch)

  See brush%.

  The return value is #f when no color matching color-name can be found in the color database.