Compare commits

..

No commits in common. "4153924c1bd219202b5fb2ac1b4f10aa62651fe1" and "496f4572e43379be00f0e7dc959fde43226c3848" have entirely different histories.

3 changed files with 253 additions and 1673 deletions

File diff suppressed because it is too large Load Diff

View File

@ -121,12 +121,12 @@
(qt:widget (window-contents))) (qt:widget (window-contents)))
;; Return the UIs XML, read from “rolladeck.ui”. ;; Return the UIs XML, read from “contacts.ui”.
;; We could generate this XML ourselves, and write a nice s-expr front-end, ;; We could generate this XML ourselves, and write a nice s-expr front-end,
;; maybe… `o` ;; maybe… `o`
(define (window-contents) (define (window-contents)
(call-with-input-file (call-with-input-file
"rolladeck.ui" "rolladecks.ui"
(lambda (in-port) (read-string #f in-port)))) (lambda (in-port) (read-string #f in-port))))

251
rolladecks.ui Normal file
View File

@ -0,0 +1,251 @@
<?xml version="1.0" encoding="UTF-8"?>
<ui version="4.0">
<class>MainWindow</class>
<widget class="QMainWindow" name="MainWindow">
<property name="geometry">
<rect>
<x>0</x>
<y>0</y>
<width>338</width>
<height>449</height>
</rect>
</property>
<property name="windowTitle">
<string>Contact</string>
</property>
<widget class="QWidget" name="centralwidget">
<layout class="QHBoxLayout" name="horizontalLayout">
<item>
<layout class="QVBoxLayout" name="verticalLayout">
<property name="sizeConstraint">
<enum>QLayout::SetMinimumSize</enum>
</property>
<item>
<widget class="QLabel" name="avatarLabel">
<property name="maximumSize">
<size>
<width>100</width>
<height>100</height>
</size>
</property>
<property name="text">
<string>Profile picture</string>
</property>
<property name="scaledContents">
<bool>true</bool>
</property>
</widget>
</item>
<item>
<spacer name="verticalSpacer">
<property name="orientation">
<enum>Qt::Vertical</enum>
</property>
<property name="sizeHint" stdset="0">
<size>
<width>20</width>
<height>40</height>
</size>
</property>
</spacer>
</item>
</layout>
</item>
<item>
<layout class="QFormLayout" name="formLayout">
<property name="labelAlignment">
<set>Qt::AlignRight|Qt::AlignTrailing|Qt::AlignVCenter</set>
</property>
<item row="0" column="0">
<widget class="QLabel" name="nameLabel">
<property name="text">
<string>Name</string>
</property>
</widget>
</item>
<item row="0" column="1">
<widget class="QLineEdit" name="nameLineEdit"/>
</item>
<item row="1" column="0">
<widget class="QLabel" name="companyLabel">
<property name="text">
<string>Company</string>
</property>
</widget>
</item>
<item row="1" column="1">
<widget class="QLineEdit" name="companyLineEdit"/>
</item>
<item row="2" column="0">
<widget class="QLabel" name="addressLabel">
<property name="text">
<string>Address</string>
</property>
</widget>
</item>
<item row="2" column="1">
<widget class="QLineEdit" name="addressLineEdit"/>
</item>
<item row="3" column="0">
<widget class="QLabel" name="cityLabel">
<property name="text">
<string>City</string>
</property>
</widget>
</item>
<item row="3" column="1">
<widget class="QLineEdit" name="cityLineEdit"/>
</item>
<item row="4" column="0">
<widget class="QLabel" name="stateLabel">
<property name="text">
<string>State</string>
</property>
</widget>
</item>
<item row="4" column="1">
<widget class="QLineEdit" name="stateLineEdit"/>
</item>
<item row="5" column="0">
<widget class="QLabel" name="zipLabel">
<property name="text">
<string>Zip</string>
</property>
</widget>
</item>
<item row="5" column="1">
<widget class="QLineEdit" name="zipLineEdit"/>
</item>
<item row="6" column="0">
<widget class="QLabel" name="countryLabel">
<property name="text">
<string>Country</string>
</property>
</widget>
</item>
<item row="6" column="1">
<widget class="QLineEdit" name="countryLineEdit"/>
</item>
<item row="7" column="0">
<widget class="QLabel" name="eMailLabel">
<property name="text">
<string>E-mail</string>
</property>
</widget>
</item>
<item row="7" column="1">
<widget class="QLineEdit" name="eMailLineEdit"/>
</item>
<item row="8" column="0">
<widget class="QLabel" name="homePhoneLabel">
<property name="text">
<string>Home phone</string>
</property>
</widget>
</item>
<item row="8" column="1">
<widget class="QLineEdit" name="homePhoneLineEdit"/>
</item>
<item row="9" column="0">
<widget class="QLabel" name="workPhoneLabel">
<property name="text">
<string>Work phone</string>
</property>
</widget>
</item>
<item row="9" column="1">
<widget class="QLineEdit" name="workPhoneLineEdit"/>
</item>
<item row="10" column="0">
<widget class="QLabel" name="faxLabel">
<property name="text">
<string>Fax</string>
</property>
</widget>
</item>
<item row="10" column="1">
<widget class="QLineEdit" name="faxLineEdit"/>
</item>
<item row="11" column="0">
<widget class="QLabel" name="urlLabel">
<property name="text">
<string>URL</string>
</property>
</widget>
</item>
<item row="11" column="1">
<widget class="QLineEdit" name="urlLineEdit"/>
</item>
<item row="12" column="0">
<widget class="QLabel" name="nicknameLabel">
<property name="text">
<string>Nickname</string>
</property>
</widget>
</item>
<item row="12" column="1">
<widget class="QLineEdit" name="nicknameLineEdit"/>
</item>
<item row="13" column="0">
<widget class="QLabel" name="birthdayLabel">
<property name="text">
<string>Birthday</string>
</property>
</widget>
</item>
<item row="13" column="1">
<widget class="QDateTimeEdit" name="birthdayDateTimeEdit"/>
</item>
</layout>
</item>
</layout>
</widget>
<widget class="QMenuBar" name="menubar">
<property name="geometry">
<rect>
<x>0</x>
<y>0</y>
<width>338</width>
<height>20</height>
</rect>
</property>
<widget class="QMenu" name="menuFile">
<property name="title">
<string>File</string>
</property>
<addaction name="actionNew"/>
<addaction name="actionOpen"/>
<addaction name="actionSave"/>
<addaction name="separator"/>
<addaction name="actionQuit"/>
</widget>
<addaction name="menuFile"/>
</widget>
<widget class="QStatusBar" name="statusbar"/>
<action name="actionQuit">
<property name="text">
<string>Exit</string>
</property>
</action>
<action name="actionSave">
<property name="enabled">
<bool>false</bool>
</property>
<property name="text">
<string>Save</string>
</property>
</action>
<action name="actionOpen">
<property name="text">
<string>Open…</string>
</property>
</action>
<action name="actionNew">
<property name="text">
<string>New…</string>
</property>
</action>
</widget>
<resources/>
<connections/>
</ui>