Name: Anonymous 2012-02-20 12:28
A dozen years ago, smalltalk was considered the number one graphical interface language, pretty much defining what is nowadays known as turtle graphics.
Unfortunately, smalltalk has a very old object system, one that is considered ancient today; So I decided to whip out a design for a less verbose object system, one that may be easier to learn.
What do you think?
Unfortunately, smalltalk has a very old object system, one that is considered ancient today; So I decided to whip out a design for a less verbose object system, one that may be easier to learn.
What do you think?
import System.
import Extra/Qt [QtGui].
class Example uses (QtGui/QWidget) [
new := [
super: new.
self initUI.
]
initUI := [
self setGeometry: [300, 300, 250, 150].
self setWindowTitle: "Icon".
self setWindowIcon: (QtGui/QIcon new: "web.png").
self show.
]
].
define [app, ex]
app := QtGui/QApplication new: System/ARGV.
ex := Example new.
System/Exit: (app: exec).