nixo
/
tsukundere-menu-exmaple
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

change anchor to fix clickable range

This commit is contained in:
nixo 2021-01-09 14:06:57 +01:00
parent 9038cf979b
commit 55ce63ae71
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
run.scm
View File

@ -34,14 +34,17 @@
(pressed . ,simple-pressed))) (pressed . ,simple-pressed)))
(checkbox-button (checkbox-button
(make-button (s32vector 0 0) "" 0 font textures (make-button (s32vector 0 0) "" 0 font textures
#:dimensions (s32vector 25 25)
#:text-colors colors #:text-colors colors
#:text-pos (s32vector 30 5) #:anchor 'center
#:text-pos (s32vector 30 -7)
#:text-alignment '(left . top) #:text-alignment '(left . top)
#:callback checkbox-button-callback)) #:callback checkbox-button-callback))
(radio-button (radio-button
(make-button (s32vector 0 0) "" 0 font textures-radio (make-button (s32vector 0 0) "" 0 font textures-radio
#:text-colors colors #:text-colors colors
#:dimensions (s32vector 200 20) #:dimensions (s32vector 200 20)
#:anchor 'top-left
#:text-alignment '(left . top) #:text-alignment '(left . top)
#:text-pos (s32vector 30 0) #:text-pos (s32vector 30 0)
#:callback radio-button-callback)) #:callback radio-button-callback))