ASM

SYSTEM

Check for multiple monitors

DIM my,mx :REM you supply a local point (0,0 = top/left of curr wnd)
DIM t,l,b,r

LONG IF SYSTEM(_macPlus) = _false
  CALL LOCALTOGLOBAL(my)
  gdHndl& = FN GETDEVICELIST
  WHILE gdHndl&
    LONG IF FN PTINRECT(my,#[gdHndl&] + _gdRect)
      t;8 = [gdHndl&] + _gdRect
      gdHndl& = 0
    END IF
    IF gdHndl& THEN gdHndl& = FN GETNEXTDEVICE(gdHndl&)
  WEND
END IF