Hmm, looks nice.
I noticed you can optimize this:
either s = selected-date [inday: true][inday: false]
to this:
inday: s = selected-date
And similar with inmonth.
Regards,
Anton.
> Hi All,
>
> Been mucking about with creating a calendar control in AGG.
> This current version (see link below) will create a new master style
> called calendar and then allow you to re-use it wherever.
>
> http://rebol.mustard.co.nz/cal_control.r
> (or goto http://rebol.mustard.co.nz to see full project details)
>
> I've still to add click events to switch months etc via mouse but the
> control can be set externally and then refreshed by the
> redraw-cal function.
>
> Please note: this require a rebol/view version with AGG abilities. The
> font style used is non-vectorial so it MAY work under the linux AGG..
> not able to test that here at this time. (Please let me know if it does).
>
> James.
--
To unsubscribe from the list, just send an email to
lists at rebol.com with unsubscribe as the subject.