beautypg.com

Apple Newton Programmer’s Newton 2.0 (for Newton 2.0) User Manual

Page 694

background image

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 +

vApplication + vClipping,

viewJustify:0,

viewBounds:SetBounds (

parentBox.left+40,

parentBox.top+40,

parentBox.right-40,

parentBox.bottom-100),

declareSelf:'base,

stepChildren:

[

{viewStationery: 'para,

text:

"test slip",

viewBounds:RelBounds(10, 10,50, 20)

},

{_proto: protoCancelButton,

buttonClickScript: func()

//closes the view and tells

//calendar the view was closed

AddDeferredSend(

cal,

'RememberedClose,

[base]),

}

],

});

// open the view and tell Dates it was opened

GetRoot().calendar:RememberedOpen(slip);

nil;

// tells Dates not to open

// 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.