Clojure - Área de trabalho exibindo campos de texto

Os campos de texto podem ser exibidos com a ajuda da classe de texto. Um exemplo de como isso é usado é mostrado no programa a seguir.

(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 textfield
      (seesaw/text
         :text "This is a text field"
         :editable? false
         :columns 50))
   (display textfield))

No código acima, primeiro é criada uma variável de campo de texto que é da classe de texto da biblioteca gangorra. Em seguida, o texto do campo de texto é definido como "Este é um campo de texto". Em seguida, o campo de texto se torna um campo estático, definindo o atributo editável como falso.

Quando o código acima for executado, você obterá a seguinte janela.