From: | David McMinn |
Date: | 3 Aug 2000 at 17:39:15 |
Subject: | Re: Screens |
KristianGK@aol.com's head burst.
All we could scrape off the wall was Screens.
> A. Count the number of open screens with Blitz.
Get a pointer to intuition base, get pointer to first screen and go through the
list. I'm not sure about the locking method I use here, you might need to add a
forbid/permit:
*ib.IntuitionBase = IntuitionBase
iblock.l = LockIBase_(0)
numscreens.w = 0
*scr.Screen = *ib\FirstScreen
while *scr
numscreens+1
*scr = *scr\NextScreen
wend
UnlockIBase_ iblock
> B. Read the title screen information.
if *scr\Title Then NPrint Peek$(*scr\Title)
Bye
---------------------------------------------------------------------
To unsubscribe, e-mail: blitz-list-unsubscribe@netsoc.ucd.ie
For additional commands, e-mail: blitz-list-help@netsoc.ucd.ie