On this page:
close-icon%
new

4 Close Icon

 (require mrlib/close-icon) package: gui-lib
The close-icon% class provides a clickable close button icon.

class

close-icon% : class?

  superclass: canvas%

constructor

(new close-icon% 
    [parent parent] 
    [[callback callback] 
    [bg-color bg-color] 
    [horizontal-pad horizontal-pad] 
    [vertical-pad vertical-pad]]) 
  (is-a?/c close-icon%)
  parent : (is-a? area-container<%>)
  callback : (-> any) = void
  bg-color : (or/c #f string (is-a?/c color%)) = #f
  horizontal-pad : positive-integer? = 4
  vertical-pad : positive-integer? = 4
The callback is called when the close icon is clicked.

If bg-color is specified, it is used as the background color of the icon.