mirror of
https://gitlab.com/eql/EQL5.git
synced 2026-03-07 14:21:52 -08:00
11 lines
355 B
Common Lisp
11 lines
355 B
Common Lisp
(in-package :example)
|
|
|
|
(defun start ()
|
|
(! "show" (qnew "QLabel"
|
|
"text" (tr (format nil "<h3>~{~R~^ ~},<br>I want to sleep until ~R"
|
|
(loop for i from 1 to 7 collect i)
|
|
11))
|
|
"alignment" |Qt.AlignCenter|
|
|
"margin" 10)))
|
|
|
|
(start)
|