MC> There are dozens of features in TSE today
> because one or two people asked for them.
Features in TSE and marketing decisions by SemWare are different
issues. Since we will not agree on the latter, it's dropped,
and we'll stick to the former. I managed to internalize an
activity I do whenever a file is unloaded, archive-bit wiping
(previously I'd done a Dos() to wipe a file's archive-bit):
proc ClearCFN()
integer A A=FileExists(CurrFileName())
SetFileAttr(CurrFileName(),A & ~ _archive_)
end
This works, but I wonder why I can't simply do
SetFileAttr(CurrFileName(),~ _archive_) -- possibly with
a slightly different syntax if this isn't quite right,
but this doesn't produce an error message, tho it also
doesn't do anything. After all, I know the file exists
already, and I don't care what the attributes are,
I just want to assure the archive bit is wiped.
Speaking of FileExists(), or any other command that would manage
it, is there a way to test if a file, any file, exists in a
directory (which will exist). Previously, FileExists() couldn't
do that, since it reports the directory itself as a file, and no
one could come up with a satisfactory way around that. It seems
a simple question. Given C:\Tek\Tse\As\, do any files exist
there, besides '.' and '..'?
Another thing I've semi-internalized is video border setting.
DESQview will retain frame colors, but won't start a new window
with one unless it's explicitly told to, which used to require
a batch file or alias. I've got TSE to now do a Dos() in Main()
to do it, which saves a bit of time and memory. (I tried
putting it in WhenLoaded(), but got various conflicts there.)
How does DOS handle screen border colors, I wonder? Is there
any way to do this with low-level stuff, instead of popping
quickly out of the editor and then back in on a start under DV?
-- SPEED 2.00 #1019: Anonymous was a woman.
--- QScan/PCB v1.17b / 01-0175
---------------
* Origin: Eagle's Nest Comm., Inc Prov, RI 401-621-4600 (1:323/150)
|