// ---- End Project Data ---- // ---- File Glancing.t ---- // Before Script for "baseView" // Copyright © 1993, 1994 by Apple Computer, Inc. All rights reserved. baseView := {title: "Glance Example", viewBounds: {top: 0, left: 0, right: 240, bottom: 336}, 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, _proto: protoApp, debug: "baseView" }; // Before Script for "pictButton" // Copyright © 1993, 1994 by Apple Computer, Inc. All rights reserved. pictButton := /* child of baseView */ {viewBounds: {left: 28, top: 122, right: 80, bottom: 144}, buttonClickScript: func() begin theGlance:Toggle(); end, icon: GetPictAsBits("PlaneBlink", nil), _proto: protoPictureButton, debug: "pictButton" }; // Before Script for "theGlance" // Copyright © 1993, 1994 by Apple Computer, Inc. All rights reserved. theGlance := /* child of baseView */ {viewBounds: {left: 29, top: 157, right: 215, bottom: 207}, text: "What's the battery state, sonny?", viewIdleFrequency: 1500, _proto: protoGlance, debug: "theGlance" }; // View theGlance is declared to baseView // Before Script for "batteryIndicator" // Copyright © 1993, 1994 by Apple Computer, Inc. All rights reserved. batteryIndicator := /* child of theGlance */ {viewBounds: {left: 8, top: 32, right: 184, bottom: 48}, _proto: protolabeledbatterygauge, debug: "batteryIndicator" }; // Before Script for "title1" // Copyright © 1993, 1994 by Apple Computer, Inc. All rights reserved. title1 := /* child of baseView */ {text: "Tap button for glance...", viewBounds: {left: 18, top: 90, right: 226, bottom: 114}, _proto: protoStaticText, debug: "title1" }; // ---- Beginning of section for non used Layout files ---- // End of output