C H A P T E R 1 9
Built-in Applications and System Data
19-20
Dates
local slip :=
BuildContext(
{_proto: protoFloater
viewFlags:vClickable + vFloating +
viewFlags:vClickable + vFloating +
vApplication + vClipping,
viewJustify:0,
viewBounds:SetBounds (
viewBounds:SetBounds (
parentBox.left+40,
parentBox.top+40,
parentBox.right-40,
parentBox.bottom-100),
parentBox.top+40,
parentBox.right-40,
parentBox.bottom-100),
declareSelf:'base,
stepChildren:
[
stepChildren:
[
{viewStationery: 'para,
text:
text:
"test slip",
viewBounds:RelBounds(10, 10,50, 20)
},
{_proto: protoCancelButton,
buttonClickScript: func()
//closes the view and tells
//calendar the view was closed
},
{_proto: protoCancelButton,
buttonClickScript: func()
//closes the view and tells
//calendar the view was closed
AddDeferredSend(
cal,
'RememberedClose,
[base]),
'RememberedClose,
[base]),
}
],
});
// open the view and tell Dates it was opened
GetRoot().calendar:RememberedOpen(slip);
GetRoot().calendar:RememberedOpen(slip);
nil;
// tells Dates not to open
// default meeting slip
// default meeting slip
end,
});
Miscellaneous Operations
19
Dates provides a number of methods that have not been mentioned elsewhere:
DisplayDate
displays meetings in the Dates application, To Do items, or the
agenda for a specified date.
GetSelectedDates
returns an array of the currently selected and
displayed dates.