source: trunk/ccl/examples/cocoa/easygui/package.lisp @ 7529

Last change on this file since 7529 was 7529, checked in by af, 13 years ago

Implement slider-view.

  • Introduce a value-mixin (and subclasses for string and numeric values).
  • Use it in view-text-via-stringvalue-mixin.
  • Put the demos into the easygui-demo package, export their windows.
File size: 1.1 KB
Line 
1(cl:defpackage :easygui
2  (:use :cl)
3  (:import-from :ccl with-autorelease-pool @selector lisp-string-from-nsstring +null-ptr+)
4  (:export #:point #:range #:rectangle #:window
5           #:point-x #:point-y #:rectangle-x #:rectangle-y #:rectangle-width
6           #:rectangle-height
7           ;; view classes
8           #:view #:static-text-view #:text-input-view #:password-input-view
9           #:push-button-view
10           #:form-view #:form-cell-view #:box-view #:drawing-view #:slider-view
11           ;; event methods
12           #:mouse-down #:mouse-dragged #:mouse-up
13           ;; operators
14           #:cocoa-ref
15           #:add-subviews #:window-show #:set-window-title
16           #:content-view
17           #:initialize-view #:action #:view-text
18           #:add-entry #:add-entries #:editable-p
19           #:draw-view-rectangle
20           #:entry-text #:nth-cell #:selection #:redisplay
21           #:string-value-of #:integer-value-of #:float-value-of
22           #:double-value-of))
23
24(cl:defpackage :easygui-demo
25  (:use :cl :easygui)
26  (:export #:converter-window #:tiny-demo-window))
27
28(cl:defpackage :easygui-user
29  (:use :cl :easygui))
Note: See TracBrowser for help on using the repository browser.