racket/gui Win32: fix use-before-definition problem for choice%
Closes PR 14475 original commit: 9cb652dd0e211c531d9d3febda7a45a8e2d29bfb
This commit is contained in:
parent
7e42de33ec
commit
43c8233308
|
@ -46,6 +46,8 @@
|
||||||
|
|
||||||
(SendMessageW hwnd CB_SETCURSEL 0 0)
|
(SendMessageW hwnd CB_SETCURSEL 0 0)
|
||||||
|
|
||||||
|
(define choice-dropped? #f)
|
||||||
|
|
||||||
(super-new [callback cb]
|
(super-new [callback cb]
|
||||||
[parent parent]
|
[parent parent]
|
||||||
[hwnd hwnd]
|
[hwnd hwnd]
|
||||||
|
@ -61,8 +63,6 @@
|
||||||
(set-size #f #f w (* h 8))))
|
(set-size #f #f w (* h 8))))
|
||||||
|
|
||||||
|
|
||||||
(define choice-dropped? #f)
|
|
||||||
|
|
||||||
(define/override (ctlproc w msg wParam lParam default)
|
(define/override (ctlproc w msg wParam lParam default)
|
||||||
(cond
|
(cond
|
||||||
[(and choice-dropped?
|
[(and choice-dropped?
|
||||||
|
|
Loading…
Reference in New Issue
Block a user