set-pen in dc<%>

Sets the current pen for this object.

The current pen does not affect text drawing; see also set-text-foreground.

While a pen is selected into a drawing context, it cannot be modified.

• (send a-dc set-pen pen) -> void
     pen : pen% object

  Installs the given pen as the current pen.

  
  

• (send a-dc set-pen color width style) -> void
     color : color% object
     width : real number in [0, 255]
     style : symbol in '(transparent solid xor hilite dot long-dash short-dash dot-dash xor-dot xor-long-dash xor-short-dash xor-dot-dash)

  Obtains a pen by providing all arguments to the-pen-list's find-or-create-pen method and installs the result as the current pen.

  
  

• (send a-dc set-pen color-name width style) -> void
     color-name : string
     width : real number in [0, 255]
     style : symbol in '(transparent solid xor hilite dot long-dash short-dash dot-dash xor-dot xor-long-dash xor-short-dash xor-dot-dash)

  Obtains a pen by providing all arguments to the-pen-list's find-or-create-pen method. If a pen is returned, it is installed as the current pen. Otherwise, the color must be bad, so an exn:fail:contract exception is raised