mirrors/EQL5
1
Fork 0
mirror of https://gitlab.com/eql/EQL5.git synced 2025-12-15 14:50:58 -08:00
Code Issues Projects Releases Packages Wiki Activity

better class finder for "-qgui"; small revisions;

Browse source
This commit is contained in:
polos 2017-01-07 10:42:37 +01:00
parent 45ba32cd0d
commit abf60c2baa
4 changed files with 42 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

2
examples/X-extras/palindrome/palindrome.lisp
View file

@ -304,7 +304,7 @@
(qset-color *main* |QPalette.Window| (if active *color-pause* *background*))))
(#.|Qt.Key_S|
(let ((widget (|viewport| *view*)))
(|save| (|grabWidget(QWidget*,QRect).QPixmap| widget (|rect| widget))
(|save| (|grab| widget (|rect| widget))
"screenshot.png")))
(#.|Qt.Key_Escape|
(qquit))))))