get-pen in dc<%>
get-pen
dc<%>
Gets the current pen. See also set-pen.
set-pen
(send a-dc get-pen) -> pen% object
(send a-dc get-pen)
send
a-dc
pen%