Monday, November 08, 2010 at 12:06 AM.
system.verbs.builtins.table.getCursorAddress
on getCursorAddress () { <<4.0.2 -- return the address of the current object
<<if a non-table window is frontmost, it's the address of that window
<<if a table window is frontmost, it's the address of the cell cursor
<<10/31/97 at 7:59:16 AM by DW -- moved from toys.getCursorAddress
local (adrobject = address (window.frontmost ()));
if adrobject == nil {
return (nil)};
if typeOf (adrobject^) == tabletype {
adrobject = table.getCursor ()};
return (adrobject)}
<<bundle <<test code
<<dialog.alert (getCursorAddress ())
This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.