2 Bitmap Label
(require mrlib/bitmap-label) |
procedure
(make-bitmap-label str img [font]) → (is-a?/c bitmap%)
str : string? img : (or/c (is-a?/c bitmap%) path-string?) font : (is-a?/c font%) = normal-control-font
Constructs a bitmap label suitable for use a button that contains the
image specified by img followed by the text in str.
procedure
((bitmap-label-maker str img) future-parent) → (is-a?/c bitmap%)
str : string? img : (or/c (is-a?/c bitmap%) path-string?) future-parent : (is-a?/c area-container<%>)
And older variant of make-bitmap-label that obtains a
font to use from a container future-parent.