fonts - Racket /平局 : get list of font face names?

Question

是否可以获取 Racket 中可用字体名称的列表？

我想要 x 的所有值，以便 (text "Kimkoh"x) 返回具有唯一字体的图片。

Answer 1

是的，(get-face-list)返回您想要的列表。

在 DrRacket 6.12(或更高版本)中尝试此操作:

#lang racket/base

(require racket/draw pict)

(table 2
       (for/fold ([acc '()]
                  #:result (reverse acc))
                 ([face (in-list (get-face-list))]
                  [i (in-range 10)])
         (list* (text "Kimkoh" face) (text face) acc))
       lb-superimpose lb-superimpose 20 5)