// ---- End Project Data ---- // ---- File Chooser.t ---- // Before Script for "mainView" // Copyright 1993-1994 Apple Computer. All rights reserved. mainView := {title: "Application", viewBounds: {left: -1, top: 8, right: 212, bottom: 141}, _proto: protoApp, debug: "mainView" }; theButton := /* child of mainView */ {text: "Choose Printer!", buttonClickScript: func() begin GetRoot().Netchooser:OpenNetChooser(nil,"=:LaserWriter@",nil,self, "Use it, dude","Bogus Printer","printers"); end, viewBounds: {left: 28, top: 20, right: 200, bottom: 64}, NetworkChooserDone: func(currentSelection, currentZone) begin getroot():Notify(kNotifyAlert,"Choice",currentSelection & " " & currentZone); end, _proto: protoTextButton, debug: "theButton" }; // View theButton is declared to mainView // ---- Beginning of section for non used Layout files ---- // End of output