Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

#263 'THE' command from a macro doesn't step to next file in the ring

open
nobody
None
5
2013-07-06
2013-07-06
LesK
No

I use the following snippet of code, or one like it, in
several places:
'extract /ring/'
If ring.0-1=ring.1 Then firstid=2 / For COMPAT Xedit (feel) /
Else firstid=1
found?=0
Do r=firstid To ring.0 While \found? / Is there a DIR in the ring? /
Parse Var ring.r fid ' Size=' .
found?=Pos(':\DIR.DIR',fid)>0
End
--Trace or
If found? Then Do / Yes, go to it /
Do r=firstid To ring.0 While \dir()
'nomsg nextwindow'
-- 'the'
End
----- end snippet -----
Note that I have to use 'nextwindow' instead of 'the'. That means my
code has to check for a split screen and save-navigate-restore to do it
right if it is split... yuck!

Discussion