find-or-create-font

Finds an existing font in the list or creates a new one (that is automatically added to the list).

• (send a-font-list find-or-create-font size family style weight underline) -> font% object
      size : exact integer in [1, 255]
      family : symbol in '(default decorative roman script swiss modern symbol system)
      style : symbol in '(normal italic slant)
      weight : symbol in '(normal bold light)
      underline = #f : boolean

  See font% for information about family, style, and weight.

  
  

• (send a-font-list find-or-create-font size face family style weight underline) -> void
      size : exact integer in [1, 255]
      face : string
      family : symbol in '(default decorative roman script swiss modern symbol system)
      style : symbol in '(normal italic slant)
      weight : symbol in '(normal bold light)
      underline = #f : boolean

  See font% for information about family, style, and weight. See also font-name-directory<%> about the use of face.