Skip to content

Instantly share code, notes, and snippets.

@dockimbel

dockimbel/draw-text-area.red

Created May 18, 2018 16:23
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save dockimbel/f0eb8af2e367fa34cfd74eaaa5ef33f9 to your computer and use it in GitHub Desktop.
Save dockimbel/f0eb8af2e367fa34cfd74eaaa5ef33f9 to your computer and use it in GitHub Desktop.
Download ZIP
Mixes drawing with text in area widget
Raw
draw-text-area.red
Red [
Note: "from: https://gitter.im/red/red/gui-branch?at=5afc55a05a1d895fae45588e"
]
view [
area 200x100 focus wrap
at 10x10 base 255.255.255.254 200x100 all-over
draw [line-width 20 pen 200.50.50.200]
on-down [repend face/draw ['line event/offset event/offset]]
on-over [if event/down? [change back tail face/draw event/offset]]
]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment