diff options
| author | Douglas-Richardson <Doug116654@gmail.com> | 2017-04-19 18:03:24 -0400 |
|---|---|---|
| committer | Douglas-Richardson <Doug116654@gmail.com> | 2017-04-19 18:03:24 -0400 |
| commit | 5e3bdbeeb4cf32a8a937f3e2f018eae4f4dda286 (patch) | |
| tree | fce846dfbfc7b7633e5aeb20a504891c224ececf /feasibility_analysis/gui/windows2.rkt | |
| parent | fe734a889397a9b0bbc55a997049d44166f18eae (diff) | |
| parent | 95f7e7443363f21cda927b1446271d5008c439d6 (diff) | |
Merge remote-tracking branch 'refs/remotes/origin/master' into grape
Diffstat (limited to 'feasibility_analysis/gui/windows2.rkt')
| -rw-r--r-- | feasibility_analysis/gui/windows2.rkt | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/feasibility_analysis/gui/windows2.rkt b/feasibility_analysis/gui/windows2.rkt deleted file mode 100644 index 3f60c80..0000000 --- a/feasibility_analysis/gui/windows2.rkt +++ /dev/null @@ -1,15 +0,0 @@ -#lang racket - -(require racket/gui/base) - -(define frame (new frame% - [label "Example"] - [width 300] - [height 300])) -(new canvas% [parent frame] - [paint-callback - (lambda (canvas dc) - (send dc set-scale 3 3) - (send dc set-text-foreground "blue") - (send dc draw-text "Don't Panic!" 0 0))]) -(send frame show #t) |