uiform register - part-cw/lambdanative GitHub Wiki
(uiform-register name draw input)
uiform-register registers a new display element using standard syntax.
| Parameter | Description |
|---|---|
| name | Display element name |
| draw | Function called when element is drawn: (lambda (x y w . arga) ...) |
| input | Function called when element is clicked: (lambda (type mx my . args) ... ) |
Example
Example 1: Define a spacer element, with code from modules/uiform/uiform.scm
(define (glgui:uiform-spacer-draw x y w . args)
(let ((h (glgui:uiform-arg args 'height 30)))
h
)
)
(uiform-register 'spacer glgui:uiform-spacer-draw #f)