set-text-foreground in dc<%>

• (send a-dc set-text-foreground color) -> void
     color : color% object

  Sets the current text foreground color for this object, used for drawing text with draw-text.

  On a monochrome display, all non-black colors are treated as white.