repos
/
qt.examples
/ annotate_shade
summary
|
shortlog
|
log
|
tree
|
commit
|
commitdiff
|
headdiff
|
annotate
|
headblob
|
headfilediff
|
filehistory
normal
|
plain
|
shade
|
zebra
Use new qt:with-app.
Annotate for file src/hello-world.lisp
2009-04-14 tobias
1
;;; Copyright 2009 Tobias Rautenkranz
14:29:22 '
2
;;; License: X11 license
'
3
2009-04-05 tobias
4
(in-package :qt.examples)
15:36:46 '
5
'
6
(defun hello-world ()
'
7
"Hello world"
2009-07-01 tobias
8
(qt:with-app ()
2009-04-05 tobias
9
(let ((widget (make-instance 'qt:push-button :args '("Hello world"))))
15:36:46 '
10
(cxx:show widget)
2009-07-01 tobias
11
(qt:exec))))