On Sunday, May 11, 2003, at 02:43 AM, michael evans wrote: > on 5/10/03 12:31 AM, Robert Purves at > robert.purves@... > wrote: > >> The demo below should get you started. There are many more RezLib >> functions defined in the RezLib shared library and discussed in the >> RezLib documentation, but I haven't included their FB conversions >> here. >> > <snip> > > Are these additional RezLib toolbox declarations correct? > > #define ScreenRef as long > toolbox fn disposeScreenRef(ScreenRef) > > #define pointerToRects as long > #define ListCount as long > toolbox fn getDisplayList(UInt32 *ListCount) = pointerToRects > toolbox fn disposeDisplayList(pointerToRects) > > Every four bytes @pointerToRects is the rect of a device, up to > ListCount? Note the capitalization of the functions in this little demo: '----------- #define ScreenRef as long library "RezLib" toolbox DisposeScreenRef( ScreenRef display ) toolbox fn GetDisplayList( unsigned long *listEntryCount ) = Ptr // to Rect toolbox DisposeDisplayList( Rect *list ) library end globals dim @ dispList as ^Rect dim tempList as ^Rect dim as Rect r dim as unsigned long @ listEntryCount dim as unsigned long j long if ( fn FBTestForLibrary( "RezLib" ) == _false ) shutdown "RezLib not found" end if dispList = fn GetDisplayList( @listEntryCount ) print "displays found = " listEntryCount j = 0 tempList = dispList // print rects of all displays while ( j < listEntryCount ) r = tempList print r tempList += sizeof( Rect ) j++ wend // finished with dispList DisposeDisplayList( @dispList ) do HandleEvents until 0 '----------- Robert P.