可以在标签类的帮助下显示标签。以下程序显示了有关如何使用它的示例。
(ns web.core (:gen-class) (:require [seesaw.core :as seesaw])) (defn -main [& args] (defn display [content] (let [window (seesaw/frame :title "Example")] (-> window (seesaw/config! :content content) (seesaw/pack!) (seesaw/show!)))) (def label (seesaw/label :text "This is a label too" :background :white :foreground :black :font "ARIAL-BOLD-10")) (display label))
在上面的代码中,创建一个标签变量,该变量来自seesaw库的标签类,接下来,标签的文本设置为“This is a label too”。然后设置背景、前景色和字体。
当上面的代码运行时,您将获得以下窗口。
![clojure desktop button](http://learnfk.xiuxiandou.com/clojure-desktop-labels.png)
参考链接
https://www.learnfk.com/clojure/clojure-desktop-displaying-labels.html
标签:标签,Labels,无涯,label,content,seesaw,window,too,Desktop From: https://blog.51cto.com/u_14033984/8081390