From: Kyle Watkins
Stephane Gibier[SMTP:sgibier@hol.fr] wrote:
> Hello,
>=20
> Is there a way top open a file in a logical Read-Only mode ? In this
> mode, all text editing features would be disabled. Note that this
> logical mode is not the same thing that the physical Read-Only file
> mode.
>=20
> Any ideas ?
> --=20
> St=E9phane Gibier
> Cet article repr=E9sente mon avis personnel et non celui de ma =
compagnie
Hi Stephane,
You may try something similar to the following. Just modify the
following as necessary, compile and then execute the macro to
start browsing the current file. Pressing gets you
out of browse mode.
// The following is based on one of the examples in the manual.
// See Process() in the on-line help or manual.
// Just add the additional keys you need available while "Browsing"
keydef BrowseKeys
BegLine()
EndLine()
BegFile()
EndFile()
Up()
Down()
Right()
Left()
PageUp()
PageDown()
EndProcess()
"Press to exit browse mode"
end
proc Browse()
if Enable(BrowseKeys, _EXCLUSIVE_)
Message("Press to exit browse mode")
Process()
Disable(BrowseKeys)
endif
end
proc main()
Browse()
end
//
Also, you may want to download BROWSE22.ZIP from our ftp site or web =
site.
It will be in the Tse-Pro directory on the ftp site =
(ftp://ftp.semware.com).
The description for the file is:
BROWSE v2.2 - macro for TSE Pro v2.5 and
2.6 makes it a brawny clone of Buerg's LIST
Plus. By David Daniel Anderson; 4 April,
1997.
Let me know if this is what you want.
Kyle Watkins (SemWare Support)
---
---------------
* Origin: apana>>>>>fidonet [sawasdi.apana.org.au] (3:800/846.13)
|