Try Qt$AlignmentFlag

On Sep 21, 6:20 am, Matt Hoyt <mrho...@yahoo.com> wrote:
> I trying to use QtJambi and I'm having problems using the enums that
> have this format Qt.<EnumName>.
>
> Error:
>
> error: java.lang.ClassNotFoundException
>
> Code:
>
> (ns collab-web-qt.dialog.connect
>   (:import (com.trolltech.qt.gui QDialog QWidget QVBoxLayout QFormLayout
> QLineEdit)
>            (com.trolltech.qt.core.Qt.AlignmentFlag)))
>
> (defn -create-username-field [#^QWidget parent])
>
> (defn -create-password-field [#^Widget parent])
>
> (defn -create-retype-password-field [#^Widget parent])
>
> (defn -create-login-form [#^QWidget parent]
>   "Used to create the login form.
> Returns the list of fields and the layout manager."
>   (let [username (-create-username-field parent)
>         password (-create-password-field parent)
>         retype-password (-create-retype-password-field parent)
>         layout (new QFormLayout parent)]
>     (doto layout
>       (. addRow "Username:" username)
>       (. addRow "Password:" password)
>       (. addRow "Retype-Password:" retype-password)
>       (. setLabelAlignment (Qt.AlignmentFlag/AlignRight)))
>     (list username password retype-password layout)))
>
> (defn -create-layout [#^QWidget parent]
>   "Creates and layouts the widgets."
>   (doto (new QVBoxLayout parent)))
>
> (defn connect [#^QWidget parent]
>   "Creates the dialog to connect to the server."
>   (let [dialog (new QDialog parent)]
>     (doto dialog
>       (. setLayout (-create-layout dialog)))))
>
> Matt

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to