Exports the given system font to a vlw file.
Examples:
(use '(incanter core processing))
(export-font "Ariel" 48 "/tmp/ariel_48.vlw")
(view
(sketch
(setup []
(let [font (load-font this "/tmp/ariel_48.vlw")]
(doto this
(text-font font)
smooth
(fill 0))))
(draw []
(doto this
(text "LAX" 0 40)
(text "AMS" 0 70)
(text "FRA" 0 100))))
:size [120 120])
Comments top
No comments for export-font. Log in to add a comment.