Curses::UI::Widget
|
+----Curses::UI::Calendar
use Curses::UI;
my $cui = new Curses::UI;
my $win = $cui->add('window_id', 'Window');
my $calendar = $win->add(
'mycalendar', 'Calendar',
-date => '2002-1-14'
);
$calendar->focus();
my $date = $calendar->get();
+----------------------+ | mmm dd yyyy | +----------------------+ | su mo tu we th fr sa | | | | 01 02 03 04 05 | | 06 07 08 09 10 11 12 | | 13 14 15 16 17 18 19 | | 20 21 22 23 24 25 26 | | 27 28 29 30 31 | +----------------------+
See exampes/demo-Curses::UI::Calendar in the distribution for a short demo.
For an explanation of these standard options, see Curses::UI::Widget.
Remark: -width and -height can be set, but this widget really want to have its content space at a minimum size. If your -width or -height is not large enough, the widget will automatically fix its value.
This option sets the date to start with. If you do not specify a date, today's date will be used automatically. The format that you can use for this date is one of:
* YYYY-M-D (e.g. 2002-1-10 or 2002-01-10)
* YYYY/M/D (e.g. 2002/1/10 or 2002/01/10))
* YYYYMMDD (e.g. 20020110)
* D-M-YYYY (e.g. 10-1-2002 or 10/01/2002)
* D/M/YYYY (e.g. 10/1/2002 or 10/01/2002)
This sets the onChange event handler for the calendar widget. If a new date is selected, the code in CODEREF will be executed. It will get the widget reference as its argument.
This option specifies whether or not a line should be drawn under the calendar.
These are standard methods. See Curses::UI::Widget for an explanation of these.
This method will return the currently selected date in the format 'YYYY-MM-DD'.
Set the selected date of the widget to DATE. See -date above for the possible formats. The widget will redraw itself, unless BOOLEAN has a true value.
This method can be used to set the -onchange event handler (see above) after initialization of the calendar.
Call the 'loose-focus' routine. This will have the menubar loose its focus and return the value 'LOOSE_FOCUS' to the calling routine.
Call the 'date-select' routine. This will select the date on which the cursor is.
Call the 'date-prevday' routine. This will have the date cursor go back one day.
Call the 'date-nextday' routine. This will have the date cursor go forward one day.
Call the 'date-nextweek' routine. This will have the date cursor go forward one week.
Call the 'date-prevweek' routine. This will have the date cursor go back one week.
Call the 'date-prevmonth' routine. This will have the date cursor go back one month.
Call the 'date-nextmonth' routine. This will have the date cursor go forward one month.
Call the 'date-prevyear' routine. This will have the date cursor go back one year.
Call the 'date-nextyear' routine. This will have the date cursor go forward one year.
Call the 'date-selected' routine. This will have the date cursor go to the current selected date.
Call the 'date-today' routine. This will have the date cursor go to today's date.
Maintained by Marcus Thiesen (marcus@cpan.thiesenweb.de)
This package is free software and is provided ``as is'' without express or implied warranty. It may be used, redistributed and/or modified under the same terms as perl itself.