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