// Text of project recToggleDemo written on 5/13/95 at 11:21 PM // Beginning of file recToggleDemo.t myBase := {viewBounds: {top: 0, left: 0, right: 240, bottom: 336}, doModalDialog: func(who) begin who:ModalDialog(); end, viewFlags: 134217733, viewFormat: nil, declareSelf: 'base, viewSetupFormScript: func() begin local b := GetAppParams(); constant kMaxWidth := 240; constant kMaxHeight := 336; self.viewBounds := RelBounds(b.appAreaLeft, b.appAreaTop, MIN(b.appAreaWidth, kMaxWidth), MIN(b.appAreaHeight, kMaxHeight)); end, debug: "myBase", viewClass: 74 }; _view000 := {title: "RecToggle Demo", _proto: @229}; AddStepForm(myBase, _view000); _view001 := {_proto: @220}; AddStepForm(myBase, _view001); _view002 := {_proto: @163}; AddStepForm(_view001, _view002); _view003 := {_proto: @234}; AddStepForm(_view001, _view003); _view004 := {viewFormat: 12625, viewBounds: {top: 32, left: 15, right: -15, bottom: -32}, viewLineSpacing: 20, viewFlags: 33553921, viewJustify: 240, viewClass: 77 }; AddStepForm(myBase, _view004); constant |layout_recToggleDemo.t| := myBase; // End of file recToggleDemo.t