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

port of EQL/Qt4 to Qt5

Browse source
This commit is contained in:
polos 2016-11-25 23:30:38 +01:00
commit 0591f54ce8
339 changed files with 99935 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

24
examples/X-extras/cpp-move-blocks/lib.cpp Normal file
View file

@ -0,0 +1,24 @@
#include "lib.h"
#include "eql_fun.h"
QT_BEGIN_NAMESPACE
static qreal easingFunction(qreal progress) {
// see "../move-blocks.lisp"
return eql_fun("eql-user::custom-easing-function", QVariant::Double,
Q_ARG(qreal, progress)).toDouble(); }
QEasingCurve* CPP::easingCurve() {
static QEasingCurve* curve = 0;
if(!curve) {
curve = new QEasingCurve(QEasingCurve::Custom);
curve->setCustomType(easingFunction); }
return curve; }
QObject* ini() {
static CPP* cpp = 0;
if(!cpp) {
cpp = new CPP; }
return cpp; }
QT_END_NAMESPACE