🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.mac
Article #24872

Re: popup menus and other UI stuff in Lightspeed Pascal

#24872
From: Owen M. Hartnett
Date: Sun, 07 Feb 1988 05:05
26 lines
1378 bytes
PopUp Menus are implemented in the current System files.  You'll need the
newest release of LSP so that you can call the routine.  The routine to
call is:
	function PopUpMenuSelect(theMenu:menuHandle;
			top,left:integer; item:integer):longint;

Simply get the Menu first, don't install in menubar, in the above call you'll
pass it it's menuHandle, top and left are the coordinates of the upper left
corner of the menu, item is the item number that should start out selected.

If you haven't got the latest LSP update, you can use an inline and define
the above function as trap $A80B.

Disconnecting the mouse from the cursor is something Apple hates to see with
a passion, so there isn't any support for it.


Owen Hartnett
Brown University Computer Science

omh@cs.brown.edu.CSNET 
omh%cs.brown.edu
{ihnp4,allegra}!brunix!omh

"Don't wait up for me tonight because I won't be home for a month."
			-W.C. Fields
Technical Details
Message-ID: <22634@brunix.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!mnetor!uunet!husc6!linus!raybed2!rayssd!brunix!nancy!omh
References: <1670@brahma.cs.hw.ac.uk>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!mnetor!uunet!husc6!linus!raybed2!rayssd!brunix!nancy!omh
From: omh@nancy (Owen M. Hartnett)
Newsgroups: comp.sys.mac
Subject: Re: popup menus and other UI stuff in Lightspeed Pascal
Message-ID: <22634@brunix.UUCP>
Date: 7 Feb 88 05:05:00 GMT
References: <1670@brahma.cs.hw.ac.uk>
Sender: root@brunix.UUCP
Reply-To: omh@nancy.UUCP (Owen M. Hartnett)
Organization: Brown University Computer Science Dept.
Lines: 26