Author: junrue Date: Mon Oct 9 18:03:01 2006 New Revision: 295 Added: trunk/docs/manual/gfg/color-blue.html trunk/docs/manual/gfg/color-green.html trunk/docs/manual/gfg/color-red.html trunk/docs/manual/gfg/color-to-rgb.html trunk/docs/manual/gfg/color.html trunk/docs/manual/gfg/copy-color.html trunk/docs/manual/gfg/make-color.html trunk/docs/manual/gfg/rgb-to-color.html trunk/docs/manual/gfw/event-select.html trunk/docs/manual/gfw/with-graphics-context.html trunk/src/tests/uitoolkit/scroll-text-panel.lisp Modified: trunk/docs/manual/Graphic-FormsProgrammingReference.wcp trunk/docs/manual/gfw/event-dispatcher.html trunk/graphic-forms-tests.asd trunk/src/tests/uitoolkit/scroll-grid-panel.lisp trunk/src/tests/uitoolkit/scroll-tester.lisp Log: initial steps towards text scroll testing; more doc work Modified: trunk/docs/manual/Graphic-FormsProgrammingReference.wcp ============================================================================== --- trunk/docs/manual/Graphic-FormsProgrammingReference.wcp (original) +++ trunk/docs/manual/Graphic-FormsProgrammingReference.wcp Mon Oct 9 18:03:01 2006 @@ -92,7 +92,7 @@ DefaultTopic=Introduction.html [TOPICS] -TitleList=59 +TitleList=69 TitleList.Title.0=Legal Information TitleList.Level.0=0 TitleList.Url.0=LegalInfo.html @@ -151,536 +151,636 @@ TitleList.Keywords.5=GFG`\graphic-forms.uitoolkit.graphics TitleList.ContextNumber.5= TitleList.ApplyTemp.5=0 -TitleList.Expanded.5=0 +TitleList.Expanded.5=1 TitleList.Kind.5=0 -TitleList.Title.6=System Package -TitleList.Level.6=1 -TitleList.Url.6=SystemPackage.html +TitleList.Title.6=color +TitleList.Level.6=2 +TitleList.Url.6=gfg\color.html TitleList.Icon.6=0 TitleList.Status.6=0 -TitleList.Keywords.6=GFS`\graphic-forms.uitoolkit.system +TitleList.Keywords.6=color`\ TitleList.ContextNumber.6= TitleList.ApplyTemp.6=0 -TitleList.Expanded.6=1 +TitleList.Expanded.6=0 TitleList.Kind.6=0 -TitleList.Title.7=code +TitleList.Title.7=color->rgb TitleList.Level.7=2 -TitleList.Url.7=gfs\code.html +TitleList.Url.7=gfg\color-to-rgb.html TitleList.Icon.7=0 TitleList.Status.7=0 -TitleList.Keywords.7=code +TitleList.Keywords.7=color->rgb`\COLORREF TitleList.ContextNumber.7= TitleList.ApplyTemp.7=0 TitleList.Expanded.7=0 TitleList.Kind.7=0 -TitleList.Title.8=comdlg-error +TitleList.Title.8=color-blue TitleList.Level.8=2 -TitleList.Url.8=gfs\comdlg-error.html +TitleList.Url.8=gfg\color-blue.html TitleList.Icon.8=0 TitleList.Status.8=0 -TitleList.Keywords.8=comdlg-error`\:dlg-code +TitleList.Keywords.8=color-blue TitleList.ContextNumber.8= TitleList.ApplyTemp.8=0 TitleList.Expanded.8=0 TitleList.Kind.8=0 -TitleList.Title.9=copy-point +TitleList.Title.9=color-green TitleList.Level.9=2 -TitleList.Url.9=gfs\copy-point.html +TitleList.Url.9=gfg\color-green.html TitleList.Icon.9=0 TitleList.Status.9=0 -TitleList.Keywords.9=copy-point +TitleList.Keywords.9= TitleList.ContextNumber.9= TitleList.ApplyTemp.9=0 TitleList.Expanded.9=0 TitleList.Kind.9=0 -TitleList.Title.10=copy-rectangle +TitleList.Title.10=color-red TitleList.Level.10=2 -TitleList.Url.10=gfs\copy-rectangle.html +TitleList.Url.10=gfg\color-red.html TitleList.Icon.10=0 TitleList.Status.10=0 -TitleList.Keywords.10=copy-rectangle +TitleList.Keywords.10=color-red TitleList.ContextNumber.10= TitleList.ApplyTemp.10=0 TitleList.Expanded.10=0 TitleList.Kind.10=0 -TitleList.Title.11=copy-size +TitleList.Title.11=copy-color TitleList.Level.11=2 -TitleList.Url.11=gfs\copy-size.html +TitleList.Url.11=gfg\copy-color.html TitleList.Icon.11=0 TitleList.Status.11=0 -TitleList.Keywords.11=copy-size +TitleList.Keywords.11=copy-color TitleList.ContextNumber.11= TitleList.ApplyTemp.11=0 TitleList.Expanded.11=0 TitleList.Kind.11=0 -TitleList.Title.12=copy-span +TitleList.Title.12=make-color TitleList.Level.12=2 -TitleList.Url.12=gfs\copy-span.html +TitleList.Url.12=gfg\make-color.html TitleList.Icon.12=0 TitleList.Status.12=0 -TitleList.Keywords.12=copy-span +TitleList.Keywords.12=make-color TitleList.ContextNumber.12= TitleList.ApplyTemp.12=0 TitleList.Expanded.12=0 TitleList.Kind.12=0 -TitleList.Title.13=detail +TitleList.Title.13=rgb->color TitleList.Level.13=2 -TitleList.Url.13=gfs\detail.html +TitleList.Url.13=gfg\rgb-to-color.html TitleList.Icon.13=0 TitleList.Status.13=0 -TitleList.Keywords.13=detail +TitleList.Keywords.13=rgb->color TitleList.ContextNumber.13= TitleList.ApplyTemp.13=0 TitleList.Expanded.13=0 TitleList.Kind.13=0 -TitleList.Title.14=dispose -TitleList.Level.14=2 -TitleList.Url.14=gfs\dispose.html +TitleList.Title.14=System Package +TitleList.Level.14=1 +TitleList.Url.14=SystemPackage.html TitleList.Icon.14=0 TitleList.Status.14=0 -TitleList.Keywords.14=disposed +TitleList.Keywords.14=GFS`\graphic-forms.uitoolkit.system TitleList.ContextNumber.14= TitleList.ApplyTemp.14=0 -TitleList.Expanded.14=0 +TitleList.Expanded.14=1 TitleList.Kind.14=0 -TitleList.Title.15=disposed-error +TitleList.Title.15=code TitleList.Level.15=2 -TitleList.Url.15=gfs\disposed-error.html +TitleList.Url.15=gfs\code.html TitleList.Icon.15=0 TitleList.Status.15=0 -TitleList.Keywords.15=disposed-error +TitleList.Keywords.15=code TitleList.ContextNumber.15= TitleList.ApplyTemp.15=0 TitleList.Expanded.15=0 TitleList.Kind.15=0 -TitleList.Title.16=disposed-p +TitleList.Title.16=comdlg-error TitleList.Level.16=2 -TitleList.Url.16=gfs\disposed-p.html +TitleList.Url.16=gfs\comdlg-error.html TitleList.Icon.16=0 TitleList.Status.16=0 -TitleList.Keywords.16=disposed-p +TitleList.Keywords.16=comdlg-error`\:dlg-code TitleList.ContextNumber.16= TitleList.ApplyTemp.16=0 TitleList.Expanded.16=0 TitleList.Kind.16=0 -TitleList.Title.17=dlg-code +TitleList.Title.17=copy-point TitleList.Level.17=2 -TitleList.Url.17=gfs\dlg-code.html +TitleList.Url.17=gfs\copy-point.html TitleList.Icon.17=0 TitleList.Status.17=0 -TitleList.Keywords.17=dlg-code +TitleList.Keywords.17=copy-point TitleList.ContextNumber.17= TitleList.ApplyTemp.17=0 TitleList.Expanded.17=0 TitleList.Kind.17=0 -TitleList.Title.18=empty-span-p +TitleList.Title.18=copy-rectangle TitleList.Level.18=2 -TitleList.Url.18=gfs\empty-span-p.html +TitleList.Url.18=gfs\copy-rectangle.html TitleList.Icon.18=0 TitleList.Status.18=0 -TitleList.Keywords.18=empty-span-p +TitleList.Keywords.18=copy-rectangle TitleList.ContextNumber.18= TitleList.ApplyTemp.18=0 TitleList.Expanded.18=0 TitleList.Kind.18=0 -TitleList.Title.19=equal-size-p +TitleList.Title.19=copy-size TitleList.Level.19=2 -TitleList.Url.19=gfs\equal-size-p.html +TitleList.Url.19=gfs\copy-size.html TitleList.Icon.19=0 TitleList.Status.19=0 -TitleList.Keywords.19=equal-size-p +TitleList.Keywords.19=copy-size TitleList.ContextNumber.19= TitleList.ApplyTemp.19=0 TitleList.Expanded.19=0 TitleList.Kind.19=0 -TitleList.Title.20=handle +TitleList.Title.20=copy-span TitleList.Level.20=2 -TitleList.Url.20=gfs\handle.html +TitleList.Url.20=gfs\copy-span.html TitleList.Icon.20=0 TitleList.Status.20=0 -TitleList.Keywords.20=handle +TitleList.Keywords.20=copy-span TitleList.ContextNumber.20= TitleList.ApplyTemp.20=0 TitleList.Expanded.20=0 TitleList.Kind.20=0 -TitleList.Title.21=location +TitleList.Title.21=detail TitleList.Level.21=2 -TitleList.Url.21=gfs\location.html +TitleList.Url.21=gfs\detail.html TitleList.Icon.21=0 TitleList.Status.21=0 -TitleList.Keywords.21=location`\ +TitleList.Keywords.21=detail TitleList.ContextNumber.21= TitleList.ApplyTemp.21=0 TitleList.Expanded.21=0 TitleList.Kind.21=0 -TitleList.Title.22=make-point +TitleList.Title.22=dispose TitleList.Level.22=2 -TitleList.Url.22=gfs\make-point.html +TitleList.Url.22=gfs\dispose.html TitleList.Icon.22=0 TitleList.Status.22=0 -TitleList.Keywords.22=make-point +TitleList.Keywords.22=disposed TitleList.ContextNumber.22= TitleList.ApplyTemp.22=0 TitleList.Expanded.22=0 TitleList.Kind.22=0 -TitleList.Title.23=make-rectangle +TitleList.Title.23=disposed-error TitleList.Level.23=2 -TitleList.Url.23=gfs\make-rectangle.html +TitleList.Url.23=gfs\disposed-error.html TitleList.Icon.23=0 TitleList.Status.23=0 -TitleList.Keywords.23=make-rectangle +TitleList.Keywords.23=disposed-error TitleList.ContextNumber.23= TitleList.ApplyTemp.23=0 TitleList.Expanded.23=0 TitleList.Kind.23=0 -TitleList.Title.24=make-size +TitleList.Title.24=disposed-p TitleList.Level.24=2 -TitleList.Url.24=gfs\make-size.html +TitleList.Url.24=gfs\disposed-p.html TitleList.Icon.24=0 TitleList.Status.24=0 -TitleList.Keywords.24=make-size +TitleList.Keywords.24=disposed-p TitleList.ContextNumber.24= TitleList.ApplyTemp.24=0 TitleList.Expanded.24=0 TitleList.Kind.24=0 -TitleList.Title.25=make-span +TitleList.Title.25=dlg-code TitleList.Level.25=2 -TitleList.Url.25=gfs\make-span.html +TitleList.Url.25=gfs\dlg-code.html TitleList.Icon.25=0 TitleList.Status.25=0 -TitleList.Keywords.25=make-span +TitleList.Keywords.25=dlg-code TitleList.ContextNumber.25= TitleList.ApplyTemp.25=0 TitleList.Expanded.25=0 TitleList.Kind.25=0 -TitleList.Title.26=native-object +TitleList.Title.26=empty-span-p TitleList.Level.26=2 -TitleList.Url.26=gfs\native-object.html +TitleList.Url.26=gfs\empty-span-p.html TitleList.Icon.26=0 TitleList.Status.26=0 -TitleList.Keywords.26=native-object +TitleList.Keywords.26=empty-span-p TitleList.ContextNumber.26= TitleList.ApplyTemp.26=0 TitleList.Expanded.26=0 TitleList.Kind.26=0 -TitleList.Title.27=point +TitleList.Title.27=equal-size-p TitleList.Level.27=2 -TitleList.Url.27=gfs\point.html +TitleList.Url.27=gfs\equal-size-p.html TitleList.Icon.27=0 TitleList.Status.27=0 -TitleList.Keywords.27=point +TitleList.Keywords.27=equal-size-p TitleList.ContextNumber.27= TitleList.ApplyTemp.27=0 TitleList.Expanded.27=0 TitleList.Kind.27=0 -TitleList.Title.28=point-x +TitleList.Title.28=handle TitleList.Level.28=2 -TitleList.Url.28=gfs\point-x.html +TitleList.Url.28=gfs\handle.html TitleList.Icon.28=0 TitleList.Status.28=0 -TitleList.Keywords.28=point-x +TitleList.Keywords.28=handle TitleList.ContextNumber.28= TitleList.ApplyTemp.28=0 TitleList.Expanded.28=0 TitleList.Kind.28=0 -TitleList.Title.29=point-y +TitleList.Title.29=location TitleList.Level.29=2 -TitleList.Url.29=gfs\point-y.html +TitleList.Url.29=gfs\location.html TitleList.Icon.29=0 TitleList.Status.29=0 -TitleList.Keywords.29=point-y +TitleList.Keywords.29=location`\ TitleList.ContextNumber.29= TitleList.ApplyTemp.29=0 TitleList.Expanded.29=0 TitleList.Kind.29=0 -TitleList.Title.30=rectangle +TitleList.Title.30=make-point TitleList.Level.30=2 -TitleList.Url.30=gfs\rectangle.html +TitleList.Url.30=gfs\make-point.html TitleList.Icon.30=0 TitleList.Status.30=0 -TitleList.Keywords.30=rectangle +TitleList.Keywords.30=make-point TitleList.ContextNumber.30= TitleList.ApplyTemp.30=0 TitleList.Expanded.30=0 TitleList.Kind.30=0 -TitleList.Title.31=size +TitleList.Title.31=make-rectangle TitleList.Level.31=2 -TitleList.Url.31=gfs\size.html +TitleList.Url.31=gfs\make-rectangle.html TitleList.Icon.31=0 TitleList.Status.31=0 -TitleList.Keywords.31=size +TitleList.Keywords.31=make-rectangle TitleList.ContextNumber.31= TitleList.ApplyTemp.31=0 TitleList.Expanded.31=0 TitleList.Kind.31=0 -TitleList.Title.32=size +TitleList.Title.32=make-size TitleList.Level.32=2 -TitleList.Url.32=gfs\size-function.html +TitleList.Url.32=gfs\make-size.html TitleList.Icon.32=0 TitleList.Status.32=0 -TitleList.Keywords.32= +TitleList.Keywords.32=make-size TitleList.ContextNumber.32= TitleList.ApplyTemp.32=0 TitleList.Expanded.32=0 TitleList.Kind.32=0 -TitleList.Title.33=size-height +TitleList.Title.33=make-span TitleList.Level.33=2 -TitleList.Url.33=gfs\size-height.html +TitleList.Url.33=gfs\make-span.html TitleList.Icon.33=0 TitleList.Status.33=0 -TitleList.Keywords.33=size-height`\ +TitleList.Keywords.33=make-span TitleList.ContextNumber.33= TitleList.ApplyTemp.33=0 TitleList.Expanded.33=0 TitleList.Kind.33=0 -TitleList.Title.34=size-width +TitleList.Title.34=native-object TitleList.Level.34=2 -TitleList.Url.34=gfs\size-width.html +TitleList.Url.34=gfs\native-object.html TitleList.Icon.34=0 TitleList.Status.34=0 -TitleList.Keywords.34=size-width +TitleList.Keywords.34=native-object TitleList.ContextNumber.34= TitleList.ApplyTemp.34=0 TitleList.Expanded.34=0 TitleList.Kind.34=0 -TitleList.Title.35=span +TitleList.Title.35=point TitleList.Level.35=2 -TitleList.Url.35=gfs\span.html +TitleList.Url.35=gfs\point.html TitleList.Icon.35=0 TitleList.Status.35=0 -TitleList.Keywords.35=span +TitleList.Keywords.35=point TitleList.ContextNumber.35= TitleList.ApplyTemp.35=0 TitleList.Expanded.35=0 TitleList.Kind.35=0 -TitleList.Title.36=span-end +TitleList.Title.36=point-x TitleList.Level.36=2 -TitleList.Url.36=gfs\span-end.html +TitleList.Url.36=gfs\point-x.html TitleList.Icon.36=0 TitleList.Status.36=0 -TitleList.Keywords.36=span-end`\ +TitleList.Keywords.36=point-x TitleList.ContextNumber.36= TitleList.ApplyTemp.36=0 TitleList.Expanded.36=0 TitleList.Kind.36=0 -TitleList.Title.37=span-start +TitleList.Title.37=point-y TitleList.Level.37=2 -TitleList.Url.37=gfs\span-start.html +TitleList.Url.37=gfs\point-y.html TitleList.Icon.37=0 TitleList.Status.37=0 -TitleList.Keywords.37=span-start`\ +TitleList.Keywords.37=point-y TitleList.ContextNumber.37= TitleList.ApplyTemp.37=0 TitleList.Expanded.37=0 TitleList.Kind.37=0 -TitleList.Title.38=toolkit-error +TitleList.Title.38=rectangle TitleList.Level.38=2 -TitleList.Url.38=gfs\toolkit-error.html +TitleList.Url.38=gfs\rectangle.html TitleList.Icon.38=0 TitleList.Status.38=0 -TitleList.Keywords.38=toolkit-error`\:detail`\ +TitleList.Keywords.38=rectangle TitleList.ContextNumber.38= TitleList.ApplyTemp.38=0 TitleList.Expanded.38=0 TitleList.Kind.38=0 -TitleList.Title.39=toolkit-warning +TitleList.Title.39=size TitleList.Level.39=2 -TitleList.Url.39=gfs\toolkit-warning.html +TitleList.Url.39=gfs\size.html TitleList.Icon.39=0 TitleList.Status.39=0 -TitleList.Keywords.39=toolkit-warning +TitleList.Keywords.39=size TitleList.ContextNumber.39= TitleList.ApplyTemp.39=0 TitleList.Expanded.39=0 TitleList.Kind.39=0 -TitleList.Title.40=win32-error +TitleList.Title.40=size TitleList.Level.40=2 -TitleList.Url.40=gfs\win32-error.html +TitleList.Url.40=gfs\size-function.html TitleList.Icon.40=0 TitleList.Status.40=0 -TitleList.Keywords.40=win32-error`\:code`\ +TitleList.Keywords.40= TitleList.ContextNumber.40= TitleList.ApplyTemp.40=0 TitleList.Expanded.40=0 TitleList.Kind.40=0 -TitleList.Title.41=win32-warning +TitleList.Title.41=size-height TitleList.Level.41=2 -TitleList.Url.41=gfs\win32-warning.html +TitleList.Url.41=gfs\size-height.html TitleList.Icon.41=0 TitleList.Status.41=0 -TitleList.Keywords.41=win32-warning +TitleList.Keywords.41=size-height`\ TitleList.ContextNumber.41= TitleList.ApplyTemp.41=0 TitleList.Expanded.41=0 TitleList.Kind.41=0 -TitleList.Title.42=Widgets Package -TitleList.Level.42=1 -TitleList.Url.42=WidgetsPackage.html +TitleList.Title.42=size-width +TitleList.Level.42=2 +TitleList.Url.42=gfs\size-width.html TitleList.Icon.42=0 TitleList.Status.42=0 -TitleList.Keywords.42=GFW`\graphic-forms.uitoolkit.widgets +TitleList.Keywords.42=size-width TitleList.ContextNumber.42= TitleList.ApplyTemp.42=0 -TitleList.Expanded.42=1 +TitleList.Expanded.42=0 TitleList.Kind.42=0 -TitleList.Title.43=default-message-filter +TitleList.Title.43=span TitleList.Level.43=2 -TitleList.Url.43=gfw\default-message-filter.html +TitleList.Url.43=gfs\span.html TitleList.Icon.43=0 TitleList.Status.43=0 -TitleList.Keywords.43=default-message-filter`\GetMessage`\MSG`\ +TitleList.Keywords.43=span TitleList.ContextNumber.43= TitleList.ApplyTemp.43=0 TitleList.Expanded.43=0 TitleList.Kind.43=0 -TitleList.Title.44=event-activate +TitleList.Title.44=span-end TitleList.Level.44=2 -TitleList.Url.44=gfw\event-activate.html +TitleList.Url.44=gfs\span-end.html TitleList.Icon.44=0 TitleList.Status.44=0 -TitleList.Keywords.44=event-activate +TitleList.Keywords.44=span-end`\ TitleList.ContextNumber.44= TitleList.ApplyTemp.44=0 TitleList.Expanded.44=0 TitleList.Kind.44=0 -TitleList.Title.45=event-arm +TitleList.Title.45=span-start TitleList.Level.45=2 -TitleList.Url.45=gfw\event-arm.html +TitleList.Url.45=gfs\span-start.html TitleList.Icon.45=0 TitleList.Status.45=0 -TitleList.Keywords.45=event-arm +TitleList.Keywords.45=span-start`\ TitleList.ContextNumber.45= TitleList.ApplyTemp.45=0 TitleList.Expanded.45=0 TitleList.Kind.45=0 -TitleList.Title.46=event-close +TitleList.Title.46=toolkit-error TitleList.Level.46=2 -TitleList.Url.46=gfw\event-close.html +TitleList.Url.46=gfs\toolkit-error.html TitleList.Icon.46=0 TitleList.Status.46=0 -TitleList.Keywords.46=event-close +TitleList.Keywords.46=toolkit-error`\:detail`\ TitleList.ContextNumber.46= TitleList.ApplyTemp.46=0 TitleList.Expanded.46=0 TitleList.Kind.46=0 -TitleList.Title.47=event-deactivate +TitleList.Title.47=toolkit-warning TitleList.Level.47=2 -TitleList.Url.47=gfw\event-deactivate.html +TitleList.Url.47=gfs\toolkit-warning.html TitleList.Icon.47=0 TitleList.Status.47=0 -TitleList.Keywords.47=event-deactivate +TitleList.Keywords.47=toolkit-warning TitleList.ContextNumber.47= TitleList.ApplyTemp.47=0 TitleList.Expanded.47=0 TitleList.Kind.47=0 -TitleList.Title.48=event-default-action +TitleList.Title.48=win32-error TitleList.Level.48=2 -TitleList.Url.48=gfw\event-default-action.html +TitleList.Url.48=gfs\win32-error.html TitleList.Icon.48=0 TitleList.Status.48=0 -TitleList.Keywords.48=event-default-action +TitleList.Keywords.48=win32-error`\:code`\ TitleList.ContextNumber.48= TitleList.ApplyTemp.48=0 TitleList.Expanded.48=0 TitleList.Kind.48=0 -TitleList.Title.49=event-dispatcher +TitleList.Title.49=win32-warning TitleList.Level.49=2 -TitleList.Url.49=gfw\event-dispatcher.html +TitleList.Url.49=gfs\win32-warning.html TitleList.Icon.49=0 TitleList.Status.49=0 -TitleList.Keywords.49=event-dispatcher +TitleList.Keywords.49=win32-warning TitleList.ContextNumber.49= TitleList.ApplyTemp.49=0 TitleList.Expanded.49=0 TitleList.Kind.49=0 -TitleList.Title.50=event-dispose -TitleList.Level.50=2 -TitleList.Url.50=gfw\event-dispose.html +TitleList.Title.50=Widgets Package +TitleList.Level.50=1 +TitleList.Url.50=WidgetsPackage.html TitleList.Icon.50=0 TitleList.Status.50=0 -TitleList.Keywords.50=event-dispose +TitleList.Keywords.50=GFW`\graphic-forms.uitoolkit.widgets TitleList.ContextNumber.50= TitleList.ApplyTemp.50=0 TitleList.Expanded.50=0 TitleList.Kind.50=0 -TitleList.Title.51=event-source +TitleList.Title.51=default-message-filter TitleList.Level.51=2 -TitleList.Url.51=gfw\event-source.html +TitleList.Url.51=gfw\default-message-filter.html TitleList.Icon.51=0 TitleList.Status.51=0 -TitleList.Keywords.51=event-source +TitleList.Keywords.51=default-message-filter`\GetMessage`\MSG`\ TitleList.ContextNumber.51= TitleList.ApplyTemp.51=0 TitleList.Expanded.51=0 TitleList.Kind.51=0 -TitleList.Title.52=message-loop +TitleList.Title.52=event-activate TitleList.Level.52=2 -TitleList.Url.52=gfw\message-loop.html +TitleList.Url.52=gfw\event-activate.html TitleList.Icon.52=0 TitleList.Status.52=0 -TitleList.Keywords.52=message-loop +TitleList.Keywords.52=event-activate TitleList.ContextNumber.52= TitleList.ApplyTemp.52=0 TitleList.Expanded.52=0 TitleList.Kind.52=0 -TitleList.Title.53=obtain-event-time +TitleList.Title.53=event-arm TitleList.Level.53=2 -TitleList.Url.53=gfw\obtain-event-time.html +TitleList.Url.53=gfw\event-arm.html TitleList.Icon.53=0 TitleList.Status.53=0 -TitleList.Keywords.53=obtain-event-time +TitleList.Keywords.53=event-arm TitleList.ContextNumber.53= TitleList.ApplyTemp.53=0 TitleList.Expanded.53=0 TitleList.Kind.53=0 -TitleList.Title.54=Miscellaneous Topics -TitleList.Level.54=0 -TitleList.Url.54=MiscellaneousTopics.html +TitleList.Title.54=event-close +TitleList.Level.54=2 +TitleList.Url.54=gfw\event-close.html TitleList.Icon.54=0 TitleList.Status.54=0 -TitleList.Keywords.54= +TitleList.Keywords.54=event-close TitleList.ContextNumber.54= TitleList.ApplyTemp.54=0 TitleList.Expanded.54=0 TitleList.Kind.54=0 -TitleList.Title.55=Image Data Plugins -TitleList.Level.55=1 -TitleList.Url.55=ImageDataPlugins.html +TitleList.Title.55=event-deactivate +TitleList.Level.55=2 +TitleList.Url.55=gfw\event-deactivate.html TitleList.Icon.55=0 TitleList.Status.55=0 -TitleList.Keywords.55= +TitleList.Keywords.55=event-deactivate TitleList.ContextNumber.55= TitleList.ApplyTemp.55=0 TitleList.Expanded.55=0 TitleList.Kind.55=0 -TitleList.Title.56=Terminology Conventions -TitleList.Level.56=0 -TitleList.Url.56=TerminologyConventions.html +TitleList.Title.56=event-default-action +TitleList.Level.56=2 +TitleList.Url.56=gfw\event-default-action.html TitleList.Icon.56=0 TitleList.Status.56=0 -TitleList.Keywords.56= +TitleList.Keywords.56=event-default-action TitleList.ContextNumber.56= TitleList.ApplyTemp.56=0 TitleList.Expanded.56=0 TitleList.Kind.56=0 -TitleList.Title.57=Glossary -TitleList.Level.57=0 -TitleList.Url.57=Glossary.html +TitleList.Title.57=event-dispatcher +TitleList.Level.57=2 +TitleList.Url.57=gfw\event-dispatcher.html TitleList.Icon.57=0 TitleList.Status.57=0 -TitleList.Keywords.57= +TitleList.Keywords.57=event-dispatcher TitleList.ContextNumber.57= TitleList.ApplyTemp.57=0 TitleList.Expanded.57=0 TitleList.Kind.57=0 -TitleList.Title.58=Footnotes -TitleList.Level.58=0 -TitleList.Url.58=Footnotes.html +TitleList.Title.58=event-dispose +TitleList.Level.58=2 +TitleList.Url.58=gfw\event-dispose.html TitleList.Icon.58=0 TitleList.Status.58=0 -TitleList.Keywords.58= +TitleList.Keywords.58=event-dispose TitleList.ContextNumber.58= TitleList.ApplyTemp.58=0 TitleList.Expanded.58=0 -TitleList.Kind.58=1 +TitleList.Kind.58=0 +TitleList.Title.59=event-select +TitleList.Level.59=2 +TitleList.Url.59=gfw\event-select.html +TitleList.Icon.59=0 +TitleList.Status.59=0 +TitleList.Keywords.59=event-select +TitleList.ContextNumber.59= +TitleList.ApplyTemp.59=0 +TitleList.Expanded.59=0 +TitleList.Kind.59=0 +TitleList.Title.60=event-source +TitleList.Level.60=2 +TitleList.Url.60=gfw\event-source.html +TitleList.Icon.60=0 +TitleList.Status.60=0 +TitleList.Keywords.60=event-source +TitleList.ContextNumber.60= +TitleList.ApplyTemp.60=0 +TitleList.Expanded.60=0 +TitleList.Kind.60=0 +TitleList.Title.61=message-loop +TitleList.Level.61=2 +TitleList.Url.61=gfw\message-loop.html +TitleList.Icon.61=0 +TitleList.Status.61=0 +TitleList.Keywords.61=message-loop +TitleList.ContextNumber.61= +TitleList.ApplyTemp.61=0 +TitleList.Expanded.61=0 +TitleList.Kind.61=0 +TitleList.Title.62=obtain-event-time +TitleList.Level.62=2 +TitleList.Url.62=gfw\obtain-event-time.html +TitleList.Icon.62=0 +TitleList.Status.62=0 +TitleList.Keywords.62=obtain-event-time +TitleList.ContextNumber.62= +TitleList.ApplyTemp.62=0 +TitleList.Expanded.62=0 +TitleList.Kind.62=0 +TitleList.Title.63=with-graphics-context +TitleList.Level.63=2 +TitleList.Url.63=gfw\with-graphics-context.html +TitleList.Icon.63=0 +TitleList.Status.63=0 +TitleList.Keywords.63=with-graphics-context +TitleList.ContextNumber.63= +TitleList.ApplyTemp.63=0 +TitleList.Expanded.63=0 +TitleList.Kind.63=0 +TitleList.Title.64=Miscellaneous Topics +TitleList.Level.64=0 +TitleList.Url.64=MiscellaneousTopics.html +TitleList.Icon.64=0 +TitleList.Status.64=0 +TitleList.Keywords.64= +TitleList.ContextNumber.64= +TitleList.ApplyTemp.64=0 +TitleList.Expanded.64=0 +TitleList.Kind.64=0 +TitleList.Title.65=Image Data Plugins +TitleList.Level.65=1 +TitleList.Url.65=ImageDataPlugins.html +TitleList.Icon.65=0 +TitleList.Status.65=0 +TitleList.Keywords.65= +TitleList.ContextNumber.65= +TitleList.ApplyTemp.65=0 +TitleList.Expanded.65=0 +TitleList.Kind.65=0 +TitleList.Title.66=Terminology Conventions +TitleList.Level.66=0 +TitleList.Url.66=TerminologyConventions.html +TitleList.Icon.66=0 +TitleList.Status.66=0 +TitleList.Keywords.66= +TitleList.ContextNumber.66= +TitleList.ApplyTemp.66=0 +TitleList.Expanded.66=0 +TitleList.Kind.66=0 +TitleList.Title.67=Glossary +TitleList.Level.67=0 +TitleList.Url.67=Glossary.html +TitleList.Icon.67=0 +TitleList.Status.67=0 +TitleList.Keywords.67= +TitleList.ContextNumber.67= +TitleList.ApplyTemp.67=0 +TitleList.Expanded.67=0 +TitleList.Kind.67=0 +TitleList.Title.68=Footnotes +TitleList.Level.68=0 +TitleList.Url.68=Footnotes.html +TitleList.Icon.68=0 +TitleList.Status.68=0 +TitleList.Keywords.68= +TitleList.ContextNumber.68= +TitleList.ApplyTemp.68=0 +TitleList.Expanded.68=0 +TitleList.Kind.68=1 Added: trunk/docs/manual/gfg/color-blue.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/color-blue.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,58 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>color-blue</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>color-blue</STRONG></TD> + <TD> + <P><FONT size=2>[Slot Accessor]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<H4></FONT><FONT face=Arial>syntax</FONT></H4> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfg:color-blue +<EM><A +href="color.html">color</A></EM>) => +<EM> integer</EM></FONT></FONT></P> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>(setf (gfg:color-blue <EM><A +href="color.html">color</A></EM>) <EM>integer</EM>)</FONT></P><FONT +face=Arial size=2><FONT face=Arial size=2> +<H4><FONT face=Arial>arguments +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>color</FONT></EM></TD> + <TD><FONT size=2>The <A href="color.html">color</A> object whose blue + component is to be queried or updated.</FONT></TD></TR> + <TR> + <TD width="20%"><EM><FONT size=2>integer</FONT></EM></TD> + <TD><FONT size=2>An integer in + the range 0 - +255.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>Returns (sets) the blue component of the specified <A +href="color.html">color</A>. + </FONT></P> +<HR> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/color-green.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/color-green.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,58 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>color-green</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>color-green</STRONG></TD> + <TD> + <P><FONT size=2>[Slot Accessor]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<H4></FONT><FONT face=Arial>syntax</FONT></H4> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfg:color-green +<EM><A +href="color.html">color</A></EM>) => +<EM> integer</EM></FONT></FONT></P> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>(setf (gfg:color-green <EM><A +href="color.html">color</A></EM>) <EM>integer</EM>)</FONT></P><FONT +face=Arial size=2><FONT face=Arial size=2> +<H4><FONT face=Arial>arguments +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>color</FONT></EM></TD> + <TD><FONT size=2>The <A href="color.html">color</A> object whose green + component is to be queried or updated.</FONT></TD></TR> + <TR> + <TD width="20%"><EM><FONT size=2>integer</FONT></EM></TD> + <TD><FONT size=2>An integer in + the range 0 - +255.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>Returns (sets) the green component of the specified <A +href="color.html">color</A>. + </FONT></P> +<HR> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/color-red.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/color-red.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,58 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>color-red</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>color-red</STRONG></TD> + <TD> + <P><FONT size=2>[Slot Accessor]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<H4></FONT><FONT face=Arial>syntax</FONT></H4> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfg:color-red +<EM><A +href="color.html">color</A></EM>) => +<EM> integer</EM></FONT></FONT></P> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>(setf (gfg:color-red <EM><A +href="color.html">color</A></EM>) <EM>integer</EM>)</FONT></P><FONT +face=Arial size=2><FONT face=Arial size=2> +<H4><FONT face=Arial>arguments +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>color</FONT></EM></TD> + <TD><FONT size=2>The <A href="color.html">color</A> object whose red + component is to be queried or updated.</FONT></TD></TR> + <TR> + <TD width="20%"><EM><FONT size=2>integer</FONT></EM></TD> + <TD><FONT size=2>An integer in + the range 0 - +255.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>Returns (sets) the red component of the specified <A +href="color.html">color</A>. + </FONT></P> +<HR> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/color-to-rgb.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/color-to-rgb.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,65 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>color->rgb</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>color->rgb</STRONG></TD> + <TD> + <P><FONT size=2> [Macro]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<P></FONT><FONT face=Arial><STRONG>syntax</STRONG></FONT></P> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfg:color->rgb <EM><A href="color.html">color</A></EM> ) => <FONT face=Courier +size=3>COLORREF</FONT></P> +<H4><FONT face=Arial> +<H4><FONT face=Arial>arguments</FONT></H4> +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>color</FONT></EM></TD> + <TD><FONT size=2>A color to + be converted to the Win32 <FONT face=Courier size=3>COLORREF</FONT> + representation.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2> This macro converts a color object to the Win32 +<FONT face=Courier size=3>COLORREF</FONT> + representation, which in CFFI terms is defined as an alias for <FONT face=Courier +size=3>:unsigned-long</FONT> + + + + + + + + </FONT></P></FONT></FONT></FONT> +<H4><FONT face=Arial>see also</FONT></H4><FONT face=Arial size=2><FONT +face=Arial size=2><FONT face=Arial size=2> +<P><A href="rgb-to-color.html">rgb->color</A></P> +<P> +<HR> + +<P></P> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/color.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/color.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,69 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>color</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial size=2> +<H4><FONT face=Arial> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>color</STRONG></TD> + <TD> + <P><FONT +size=2>[Structure]</FONT> </P></TD></TR></TABLE> + +</FONT> +<HR></H4> +<H4><FONT face=Arial>description</FONT></H4><FONT face=Arial size=2> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2>This structure represents a color in the RGB color +model. Each color component value is specified in the range 0 - + 255.</FONT></FONT></P> +<H4><FONT face=Arial>slots</FONT></H4><FONT face=Arial size=2><EM> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>blue</FONT></EM></TD> + <TD><FONT size=2> + The blue component.</FONT></TD></TR> + <TR> + <TD width="20%"><EM><FONT size=2>green</FONT></EM></TD> + <TD><FONT size=2> + The green +component.</FONT></TD></TR> + <TR> + <TD width="20%"><FONT size=2><EM>red</EM></FONT></TD> + <TD><FONT size=2> The red +component.</FONT></TD></TR></TABLE></EM></FONT> </FONT><FONT face=Arial><FONT face=Arial size=2><EM></P> +<H4></EM></FONT>see also</FONT></H4> +<P><FONT face=Arial size=2><FONT face=Arial size=2><A href="color-blue.html">color-blue</A>, +<A href="color-green.html">color-green</A>, <A +href="color-red.html">color-red</A>, <A +href="color-to-rgb.html">color->rgb</A>, <A +href="copy-color.html">copy-color</A>, <A href="make-color.html">make-color</A>, <A +href="rgb-to-color.html">rgb->color</A> <A +href="point-y.html"></A></FONT></FONT></P> +<P><FONT face=Arial size=2><FONT face=Arial size=2><EM> +<HR> + +<P></P> +<P></P> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></EM></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/copy-color.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/copy-color.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,56 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>copy-color</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body> +<H4><FONT face=Arial> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + <TBODY> + <TR> + <TD width="60%"><STRONG>copy-color</STRONG></TD></FONT> + <TD> + <P><FONT face=Arial +size=2>[Function]</FONT> </P></TD></TR></TBODY></TABLE> +<HR></H4> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial><STRONG>syntax</STRONG></FONT></P> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfg:copy-color +<EM><A +href="color.html">color</A></EM>) +=> <A href="color.html">new color</A> <EM> </EM></FONT></FONT></P><FONT +face=Arial size=2><FONT face=Arial size=2> +<H4><FONT face=Arial>arguments +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>color</FONT></EM></TD> + <TD><FONT size=2>The <A href="color.html">color</A> structure to be + copied.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2> Returns a new <A +href="point.html">color</A> whose color component values were copied from the + original.</FONT></P> +<H4><FONT face=Arial>see also</FONT></H4> +<P><A href="make-color.html">make-color</A></P> +<P> +<HR> + +<P></P> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/make-color.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/make-color.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,68 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>make-color</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body> +<H4><FONT face=Arial> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>make-color</STRONG></TD> + <TD> + <P><FONT +size=2>[Function]</FONT> </P></TD></TR></TABLE></FONT><FONT face=Arial size=2> +<HR></H4></FONT> +<H4 dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial>syntax</FONT></H4> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial><FONT +size=2>(gfg:make-color :blue <EM>integer</EM> :green <EM>integer</EM> :red <EM>integer</EM>) +=> <EM><A +href="point.html">color</A> </EM></FONT></FONT></P><FONT +face=Arial size=2><FONT face=Arial size=2> +<H4><FONT face=Arial>arguments +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>:blue</FONT></EM></TD> + <TD><FONT size=2> The + blue color component (0 - 255).</FONT></TD></TR> + <TR> + <TD width="20%"><EM><FONT size=2>:green</FONT></EM></TD> + <TD><FONT size=2>The green + color component (0 - +255).</FONT></TD></TR> + <TR> + <TD width="20%"><FONT size=2><EM>:red</EM></FONT></TD> + <TD><FONT +size=2>The red color + component (0 - +255).</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2> Returns a newly-created <A +href="color.html">color</A>. + </FONT></P> +<H4><FONT face=Arial>see also</FONT></H4> +<P><A href="copy-color.html">copy-color</A></P> +<P> +<HR> + +<P></P> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. + Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfg/rgb-to-color.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfg/rgb-to-color.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,71 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>rgb->color</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>rgb->color</STRONG></TD> + <TD> + <P><FONT size=2> [Macro]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<P></FONT><FONT face=Arial><STRONG>syntax</STRONG></FONT></P> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfg:rgb->color <FONT face=Courier +size=3><EM>COLORREF</EM></FONT>) => <EM><A +href="color.html">color</A></EM></P> +<H4><FONT face=Arial> +<H4>arguments</H4> +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><FONT + face=Courier><EM>COLORREF</EM></FONT></TD> + <TD><FONT size=2> + A Win32 <FONT face=Courier size=3>COLORREF</FONT> value to + be translated to a <A + href="color.html">color</A> + object.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2> This macro converts a Win32 +<FONT face=Courier size=3>COLORREF</FONT> + value, which in CFFI terms is defined as an alias for <FONT face=Courier +size=3>:unsigned-long<FONT face=Arial size=2>, to a <A +href="color.html">color</A> +object.</FONT></FONT> + + + + + + + + </FONT></P></FONT></FONT></FONT> +<H4><FONT face=Arial>see also</FONT></H4><FONT face=Arial size=2><FONT +face=Arial size=2><FONT face=Arial size=2> +<P><A href="color-to-rgb.html">color->rgb</A></P> +<P> +<HR> + +<P></P> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Modified: trunk/docs/manual/gfw/event-dispatcher.html ============================================================================== --- trunk/docs/manual/gfw/event-dispatcher.html (original) +++ trunk/docs/manual/gfw/event-dispatcher.html Mon Oct 9 18:03:01 2006 @@ -38,9 +38,9 @@ <TD width="28%"><FONT size=1>scrolling-event-dispatcher</FONT></TD> <TD width="28%"><FONT size=1></FONT></TD> <TD width="28%"><FONT size=1></FONT></TD></TR></TBODY></TABLE></FONT></P> -<P dir=ltr style="MARGIN-RIGHT: 0px"> Applications define -subclasses of this class and implement one or more -of the event functions in order to implement desired +<P dir=ltr style="MARGIN-RIGHT: 0px"> Applications define subclasses +of this class and implement one or more of +the event generic functions in order to implement desired behavior.</FONT></FONT></P> <H4><FONT face=Arial>see also</FONT></H4> Added: trunk/docs/manual/gfw/event-select.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfw/event-select.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,61 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>event-select</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>event-select</STRONG></TD> + <TD> + <P><FONT size=2>[Generic Function]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<P></FONT><FONT face=Arial><STRONG>syntax</STRONG></FONT></P> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfw:event-select <EM><A +href="event-dispatcher.html">event-dispatcher</A> widget</EM>)</P> +<H4><FONT face=Arial>arguments +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>event-dispatcher</FONT></EM></TD> + <TD><FONT size=2>The <A href="event-dispatcher.html" >event-dispatcher</A> that will + process the selection event.</FONT></TD></TR> + <TR> + <TD width="20%"><FONT size=2><EM>widget</EM></FONT></TD> + <TD><FONT size=2>The widget (or + sub-element thereof) being +selected.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2> Implement a method for this generic function to +handle notification that <EM>widget</EM> + + + + or + + some sub-element of widget has been + selected. +Selection may occur via the mouse or + keyboard.</FONT></P> +<HR> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Added: trunk/docs/manual/gfw/with-graphics-context.html ============================================================================== --- (empty file) +++ trunk/docs/manual/gfw/with-graphics-context.html Mon Oct 9 18:03:01 2006 @@ -0,0 +1,66 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> +<html> +<head> +<title>with-graphics-context</title> +<meta name="GENERATOR" content="WinCHM"> +<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252"> + +</head> + +<body><FONT face=Arial> +<H4> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" +borderColor=#ffffff cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%"><STRONG>with-graphics-context</STRONG></TD> + <TD> + <P><FONT size=2> [Macro]</FONT> </P></TD></TR></TABLE> +<HR></H4> +<P></FONT><FONT face=Arial><STRONG>syntax</STRONG></FONT></P> + <P dir=ltr style="MARGIN-RIGHT: 0px"><FONT +face=Arial size=2><FONT face=Arial size=2>(gfw:with-graphics-context (<EM>graphics-context</EM> &optional +<EM>thing</EM>) &body<EM> body</EM>)</P> +<H4><FONT face=Arial> +<H4><FONT face=Arial>arguments</FONT></H4> +<P> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="20%"><EM><FONT size=2>graphics-context</FONT></EM></TD> + <TD><FONT size=2>A symbol + naming the graphics-context object to be created.</FONT></TD></TR> + <TR> + <TD width="20%"><EM><FONT size=2>thing</FONT></EM></TD> + <TD><FONT size=2>An instance of + a widget subclass or an +image.</FONT></TD></TR> + <TR> + <TD width="20%"><FONT size=2><EM>body</EM></FONT></TD> + <TD><FONT size=2>Application code to make use of + <EM>graphics-context</EM>.</FONT></TD></TR></TABLE></P>description</FONT></H4><FONT face=Arial size=2> +<P dir=ltr style="MARGIN-RIGHT: 0px"><FONT face=Arial size=2> This macro manages the lifetime of a graphics-context +object for use by the code of <EM>body</EM>. The <EM>graphics-context</EM> will be associated +with <EM>thing</EM> if it + + + + + is specified. Otherwise, + this +macro creates a graphics-context compatible with the + display.</FONT></P> +<HR> + +<P dir=ltr style="MARGIN-RIGHT: 0px"> </P> +<P dir=ltr style="MARGIN-RIGHT: 0px"> +<TABLE style="WIDTH: 100%; BORDER-COLLAPSE: collapse" borderColor=#ffffff +cellSpacing=0 cellPadding=2 width="100%" border=1> + + <TR> + <TD width="60%">  </TD> + <TD> + <P><FONT size=1>Copyright � 2006, Jack D. Unrue</FONT> +</P></TD></TR></TABLE></P></FONT></FONT></FONT></body> +</html> Modified: trunk/graphic-forms-tests.asd ============================================================================== --- trunk/graphic-forms-tests.asd (original) +++ trunk/graphic-forms-tests.asd Mon Oct 9 18:03:01 2006 @@ -92,5 +92,6 @@ (:file "drawing-tester") (:file "widget-tester") (:file "scroll-grid-panel") + (:file "scroll-text-panel") (:file "scroll-tester") (:file "windlg"))))))))) Modified: trunk/src/tests/uitoolkit/scroll-grid-panel.lisp ============================================================================== --- trunk/src/tests/uitoolkit/scroll-grid-panel.lisp (original) +++ trunk/src/tests/uitoolkit/scroll-grid-panel.lisp Mon Oct 9 18:03:01 2006 @@ -42,6 +42,9 @@ (defclass scroll-grid-panel-events (gfw:event-dispatcher) ()) +(defun select-grid (disp item) + (declare (ignore disp item))) + (defun make-scroll-grid-panel (parent) (let ((panel-size (gfs:make-size :width (1+ (* (gfs:size-width *grid-model-size*) +grid-cell-extent+)) :height (1+ (* (gfs:size-height *grid-model-size*) +grid-cell-extent+)))) Modified: trunk/src/tests/uitoolkit/scroll-tester.lisp ============================================================================== --- trunk/src/tests/uitoolkit/scroll-tester.lisp (original) +++ trunk/src/tests/uitoolkit/scroll-tester.lisp Mon Oct 9 18:03:01 2006 @@ -49,18 +49,36 @@ (defun scroll-tester-internal () (setf *default-pathname-defaults* (parse-namestring gfsys::*gf-tests-dir*)) - (let ((disp (make-instance 'scroll-tester-events)) - (layout (make-instance 'gfw:heap-layout)) - (menubar (gfw:defmenu ((:item "&File" - :submenu ((:item "E&xit" :callback #'scroll-tester-exit))))))) - (setf *scroll-tester-win* (make-instance 'gfw:top-level :dispatcher disp - :layout layout - :style '(:workspace :horizontal-scrollbar :vertical-scrollbar))) - (let ((icons (make-instance 'gfg:icon-bundle :file (merge-pathnames "default.ico"))) - (panel (make-scroll-grid-panel *scroll-tester-win*))) + (let ((layout (make-instance 'gfw:heap-layout)) + (icons (make-instance 'gfg:icon-bundle :file (merge-pathnames "default.ico")))) + (setf *scroll-tester-win* (make-instance 'gfw:top-level + :dispatcher (make-instance 'scroll-tester-events) + :layout layout + :style '(:workspace :horizontal-scrollbar :vertical-scrollbar))) + (setf (gfw:image *scroll-tester-win*) icons) + (let* ((grid-panel (make-scroll-grid-panel *scroll-tester-win*)) + (text-panel (make-scroll-text-panel *scroll-tester-win*)) + (select-grid (lambda (disp item) + (declare (ignore disp item)) + (setf (gfw:top-child-of layout) grid-panel) + (gfw:layout *scroll-tester-win*))) + (select-text (lambda (disp item) + (declare (ignore disp item)) + (setf (gfw:top-child-of layout) text-panel) + (gfw:layout *scroll-tester-win*))) + (manage-tests-menu (lambda (disp menu) + (declare (ignore disp)) + (let ((top (gfw::obtain-top-child *scroll-tester-win*)) + (items (gfw:items-of menu))) + (gfw:check (elt items 0) (eql top grid-panel)) + (gfw:check (elt items 1) (eql top text-panel))))) + (menubar (gfw:defmenu ((:item "&File" + :submenu ((:item "E&xit" :callback #'scroll-tester-exit))) + (:item "&Tests" :callback manage-tests-menu + :submenu ((:item "&Simple Grid" :callback select-grid) + (:item "&Text" :callback select-text))))))) (setf (gfw:menu-bar *scroll-tester-win*) menubar - (gfw:top-child-of layout) panel - (gfw:image *scroll-tester-win*) icons)) + (gfw:top-child-of layout) grid-panel)) (setf (gfw:text *scroll-tester-win*) "Scroll Tester" (gfw:size *scroll-tester-win*) (gfs:make-size :width 300 :height 275)) (gfw:show *scroll-tester-win* t))) Added: trunk/src/tests/uitoolkit/scroll-text-panel.lisp ============================================================================== --- (empty file) +++ trunk/src/tests/uitoolkit/scroll-text-panel.lisp Mon Oct 9 18:03:01 2006 @@ -0,0 +1,46 @@ +;;;; +;;;; scroll-text-panel.lisp +;;;; +;;;; Copyright (C) 2006, Jack D. Unrue +;;;; All rights reserved. +;;;; +;;;; Redistribution and use in source and binary forms, with or without +;;;; modification, are permitted provided that the following conditions +;;;; are met: +;;;; +;;;; 1. Redistributions of source code must retain the above copyright +;;;; notice, this list of conditions and the following disclaimer. +;;;; +;;;; 2. Redistributions in binary form must reproduce the above copyright +;;;; notice, this list of conditions and the following disclaimer in the +;;;; documentation and/or other materials provided with the distribution. +;;;; +;;;; 3. Neither the names of the authors nor the names of its contributors +;;;; may be used to endorse or promote products derived from this software +;;;; without specific prior written permission. +;;;; +;;;; THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS "AS IS" AND ANY +;;;; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED +;;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DIS- +;;;; CLAIMED. IN NO EVENT SHALL THE AUTHORS AND CONTRIBUTORS BE LIABLE FOR ANY +;;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES +;;;; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; +;;;; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND +;;;; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +;;;; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS +;;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +;;;; + +(in-package #:graphic-forms.uitoolkit.tests) + +(defclass text-grid-panel-events (gfw:event-dispatcher) ()) + +(defun make-scroll-text-panel (parent) + (declare (ignore parent))) + +#| + (gfw:with-graphics-context (gc panel) + (let* ((font (make-instance 'gfg:font :gc gc)) + (metrics (gfg:metrics gc font)))))) + +|# \ No newline at end of file