home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Powerdrive 1997 June
/
POWERDRIVE0697.ISO
/
programm
/
tb40hyp.sbk
(
.txt
)
< prev
next >
Wrap
Asymetrix ToolBook File
|
1996-01-09
|
70KB
|
796 lines
F 8 8 K
*ClassTbl*
*ClassEntry*
*PTABLE*
*WINDOWSEG*
*ICONRESTAB*
*ICONRESSEG*
*ICONRES*
Background
*OBJTABLE*
*IDTABLE*
*NAMETAB*
Rectangle
Ellipse
RoundedRectangle
Polygon
IrregularPolygon
AngledLine
Curve
PaintObject
Picture
Hotword
*RHOTWORD*
Group
Stage
Button
Viewer
ComboBox
Field
RecordField
*TbxBase*
& oup
8 UTOSEGMENT*
UTOSEGMENT*
&File
&Open... Ctrl+O
&Save Ctrl+S
Save &As...
saveas
&Import...
import
&Export...
export
Print Set&up...
printsetup
&Print Pages... Ctrl+P
printpages
Prin&t Report...
printreport
Send &Mail...
sendmail
&Run...
E&xit Alt+F4
&Edit
&Undo Ctrl+Z
Cu&t Ctrl+X
&Copy Ctrl+C
&Paste Ctrl+V
paste
C&lear Del
clear
Select &All Shift+F9
selectall
Select Pa&ge Shift+F12
selectpage
&Size to Page F11
sizetopage
F&ind... F5
Re&place...
replace
Aut&hor F3
author
&Text
&Character... F6
character
&Paragraph... F7
paragraph
&Regular Ctrl+Space
regular
&Bold Ctrl+B
&Italic Ctrl+I
italic
&Underline Ctrl+U
underline
Stri&keout Ctrl+K
strikeout
Superscrip&t/Subscript
superscriptSubscript
&Normal Script
normalscript
Su&bscript Ctrl+L
subscript
Su&perscript Ctrl+Shift+L
superscript
&Show Hotwords F9
showhotwords
&Page
&Next Alt+Right
&Previous Alt+Left
previous
&First Alt+Up
first
&Last Alt+Down
&Back Shift+F2
&History... Ctrl+F2
history
N&ew Page Ctrl+N
newpage
&Help
&Contents F1
contents
Status &Bar F12
statusbar
erlink"
if "Add"
asym_addAnswerHyperlink
tbk_DoHyperlink
_tbk_hyperlinkCandidates
buttonClick
buttonClick
false
_tbk_ExecHyperlink
tbk_HasHyperlinks
_asym_hyperlinks
tbk_DoHyperlink
_asym_hyperlinks
_tbk_HyperlinkCandidates
,"J,"
false
Itbk_PopupPage
asym_resetCursor
cursN
_tbk_HyperlinkLinkInfo
<exit>
tbk_GoToPage
_tbk_ExecHyperLink
tbk_FindHyperPage
pgRef
false
C6_tbk_HyperlinkIRow
_tbk_HyperlinkLinkInfo
l_tbk_PopupPage
tbk_PopupPage
C6_tbk_HyperlinkIRow
false
A_tbk_AddLinkToArray
tbk_HasHyperlinks
_asym_hyperlinks
_asym_hyperlinks
_tbk_AddHyperlink
tbk_HasHyperlinks
_asym_hyperlinks
tbk_getHyperlinks
itemOffset
tbk_itemOffset
the list of directories stored in the tbk_HyperPath property
&B. Store Directory in Hyperlink
B. Store the directory with the book file name
won't be able to move the books around without breaking
>tbk_Container
fName
in the hyperlink. This makes the link faster but you
that will be searched automatically. You can:
to find the destination book even if you move the books
false
thisBook
of this book.
to a different configuration directory, simply by changing
the link.
destBook
V_SetHyperPath
Mtbk_MakeIntoRelPath
<next>,<previous>,<last>,<first>,<back>
HshortFileName
Mtbk_HyperPath
hyperPath
5tbk_altPgName
relPath
pathOfFile
mqtbk_itemOffset
The destination book is not in a directory
to search automatically. This will make it possible
A. Add the destination directory to the current book's list of directories
tb40dlg.dll
\ tbk_nameOrID
&A. Add Directory to Search Path
thisPath
destPath
tbk_FindPathFile
_tbk_AddLinkToArray
<BookDir>
>tbk_Container
bkName
tbk_CurrentDirectory
_asym_HyperPath
deftag
Mtbk_MakeIntoRelPath
pathOfFile
BookDir
thePath
tbk_RelativePath
_SetHyperPath
tbk_FindHyperPage
_tbk_BadLinksList
C6_tbk_HyperlinkIRow
_tbk_ClearHyperlinkFromArray
false
tbk_HasHyperlinks
_asym_hyperlinks
_asym_hyperlinks
_tbk_ClearHyperlinkFromArray
_tbk_ClearHyperlink
>tbk_Container
hotword button
_AutoCloseCheck
s_tbk_popViewers
HorizontalDisplayRes
>tbk_Container
There are no Viewers available.
false
sysMenu
lScreenFromPage
9VerticalDisplayRes
TB40win.dll
thinCaption
asym_resetCursor
magicName
tbk_TempViewer
vtemp
jtbk_CloseOnEsc
thick
autoClose
Do not rename me
ScreenFromPage
, UAddLg
VerticalDisplayRes
HorizontalDisplayRes
shadow
_tbk_PopupPage
transPt
false
_tbk_sysCursor
transPt
oldPg
pgRef
false
transfx
oldCurs
asym_resetCursor
page id
%sysMousePosition%
tbk_GoToPage
.'+ +F
asym_resetCursor
<back>
<next>
pathOfFile
<last>
<previous>
Mtbk_HyperPath
<exit>
<first>
tbk_FindPathFile
tbk_FindHyperPage
_tbk_HyperlinkIRow
.', #?
pgCaption
title
tbk_AltPgName
groupfieldrecordfieldpagebackgroundbook
of book
tbk_Container
pathOfFile
tbk_MakeIntoRelPath
shortFileName
>tbk_Container
jtbk_Trim
tbk_CurrentDirectory
pathOfFile
itemOffset
tbk_itemOffset
, TX" /-#
mqtbk_itemOffset
tb40dlg.dll
_asym_HyperPath
tbk_HyperPath
V_SetHyperPath
Hyperlinking
tbk_HyperPath
tbk_IsFile
TB40DOS.DLL
DOSPath
GetDosEnvironmentString
false
jtbk_trim
I4GetDosEnvironmentString
pathOfFile
tbk_ExpandRelPath
testName
bkPath
tbk_FindPathFile
w, #>
vGetCurrentDirectory
GetCurrentDrive
TB40DOS.dll
GetCurrentDrive
GetCurrentDirectory
X"/g
tbk_CurrentDirectory
tbk_CurrentDirectory
tbk_CurrentPath
tbk_FindPage
_asym_hyperlinks
tbk_HasHyperlinks
FileExists
FileExists
TB40dos.dll
tbk_IsFile
.', #?
tbk_NameOrID
tbk_trim
oldse
_tbk_SysCursor
buttonClick loc
LOCAL hyperlinks[][]
candidates[]
asym_addAnswerHyperlink(); -- test
CBT Edtion, NULL
xpresent
obj =
_tbk_hyperlinkCandidates(
tbk_DoHyperlink(
i], "
, triggerName
tbk_HasHyperlinks(
= _asym_hyperlinks
_tbk_ExecHyperlink(
_tbk_HyperlinkCandidates obj,
Hreference
WORD n
n] =
_tbk_ExecHyperLink
, linkName
_tbk_HyperlinkLinkInfo(
cursN =
isType("
"> 0
*<= 44
tbk_PopupPage(
tbk_GoToPage(
asym_resetCursor
, resolv
i = _tbk_HyperlinkIRow(
i = 0
i][2] &
i][3]) =
i][2]
"<" -- keyword
~ <>
pgRef = tbk_FindHyperPage (
i][3],
[i][4])
i][3],
[i][4])
i][5],
i][6],
i][7],
i][8],
i][9]
"OK",
i][3],
i][4]
"BAD",
i][2],
i][3],
[i][4]
, popStyle, pos, captn,
_tbk_PopupPage(
.tn,
_tbk_AddHyperlink
, transFx, linkType,
i =
i = 0
i =
dimensions(
) + 1
i = 1
i][1] =
_tbk_AddLinkToArray(hyperLinks, i,
tbk_getHyperlinks
LInfo
n =
i][9]
i][7]
i][6]
i][4]
i][3]
i][2]
i][1]
hLInfo =
& CRLF
iRow,
--**
HCO 940727
linkDLL "tb40dlg.dll"
INT tbk_itemOffset =
(STRING,
.>") > 0
][2] =
][3] =
][4] =
][2] = tbk_nameOrID(
][3] = tbk_altPgName(
thisBook =
destBook = tbk_Container(
][4] =
fName =
destPath = pathOfFile(
thisPath =
"c:\"
"c:\x\"
relPath = tbk_MakeIntoRelPath(
shortFileName(
hyperPath = tbk_HyperPath(
inPath = (tbk_FindPathFile(
B) <>
"The destination
a directory"\
&& "that will be searched automatically. You can:"\
&& "A. Add the
current
8's list
directories"\
nThis
possible"\
find
8even
mbooks"\
a different configuration
, simply
Hchanging"\
stored
property"\
& "B. Store
8file
makes
faster but
&& "won't be able
around without breaking"\
f"&A.
Directory
Search
"&B.
"Add"
_SetHyperPath
][4] =
][6] =
][7] =
][9] =
bk, what
bk <>
bk =
bk =
bk =
bkName =
BookDir =
tbk_CurrentDirectory()
deftag = "<
tagLen =
BookDirLen =
dir =
<> "\"
@bookDir
+) = 1
) = 1
taglen
thePath = tbk_RelativePath(
*<> dir
thepath
_asym_HyperPath
_tbk_BadLinksList
--**
HCO 940727
stack badLinks
[i][2] <>
[i][2],
i,3],
i][4]) =
i][1]
_tbk_ClearHyperlinkFromArray
newLinks[][]
,i,j,k
n =
i =
IsAnsArray = (
) > 10)
(i > 0
(n = 1
i = 1) -- special
Mbecause
array assignment bug
i][j] =
i > 0
j][k] =
j][k]
n - 1
j][k] =
j+1][k]
= newlinks
1][2] <>
) <= 10
) = 1
1][2] =
_AutoCloseCheck loc
v =
. = mousePosition
objectFromPoint(
{oldPg
oldCurs
pos =
maxPopups = 5 --** MAGIC NUMBER
magicName = "Do
xrename me"
myBk =
ss =
(s_tbk_popViewers) >=
isOpen
= TRUE
parentHandle
close v
= ss;
--
available
vtemp =
&& i)
vTemp
"There
tbk_TempViewer
style
v = "sysMenu"
imageBuffers
v = 1
alwaysReader
captionBar
tbk_CloseOnEsc
c"autoClose"
c"shadow"
c"thick"
v = "thickFrame"
c"thinCaption"
v = "thinFrame"
v = "
v = "
v = dialogFrame
ss =
--** DEBUG
X"TB40win.
ScreenFromPage(
VerticalDisplayRes()
HorizontalDisplayRes()
-- place
mouseclick
--defaultPosition
v = "
pageUnitsToScreen(
, targetWindow)
windowHandle
',pageScroll
=, pos)
defaultPage
x2 >
s() - x2,0
y2 >
) - y2
x1 < 0
H-x1,0
y1 < 0
H0,-y1
--
sharedScript "
tbk_container(
, transfx,
ss=
= _tbk_sysCursor()
<> "
p =
p > 0
transPt =
Vp + 4
transition
pgName,
logical ss
, destbk
refString
"<" --
pg =
bk =
ss =
bk <>
bk =
8) & bk)
bk =
bk =
"ID"
DWORD,
" &&
" &&
isObject(
--
"ID"
) = 2
AltPgName)
n =
"i][1] =
tbk_AltPgName
title
pgCaption
"ID" &&
!objType
~#nextObj
wCnt =
#"BOOK"
WCnt
"groupfieldrecordfieldpagebackgroundbook"
p =
p > 0
Vp+4
Obj =
U(fn)
rootPath,longPath
) = 1
p1 = 1;p2 = p1
cp2 <
p2 > 0
dirlen = p2 - p1
p2 - 1
p2 = p2 -
p1 = p2
U(fn)
Vi + 1
U(fn)
result, bkPath,
bk =
bk =
bk <>
bk =
bk <>
tbk_Trim(
) > 0
"Hyperlinking"
DOSPath =
c":\"
tbk_IsFile(
d TB40DOS.DLL"
G GetDosEnvironmentString(
"PATH")
p =
~("=",
p > 0
p =
~(";",
cp <> 0
= ","
p =
~(";",
tbk_trim(
<> "\"
tbk_ExpandRelPath(
<> ":"
testName =
t" GetCurrentDrive()
" GetCurrentDirectory(
drv =
"\" &
<> "\"
<& ":" &
tbk_CurrentPath
tbk_FindPage pgN
ss =
* obj
ss =
FileExists(
$TB40dos.
tbk_NameOrID
"ID" &&
cs <>
s <= SPACE
cs <>
s <=
_tbk_SysCursor
;oldse=
r;oldsen=sysErrorNumber
+real",
popup viewer
itemOffset
tbk_itemOffset
mqtbk_itemOffset
tb40dlg.dll
stbk_popViewers
closeWindow
closeWindow
SYSTEM stbk_popViewers
linkDLL "tb40dlg.dll"
INT tbk_itemOffset =
(STRING,
<BookPath>
:HDMEDIAPATH
MS Sans Serif
info_LastSaved
1/4/96 1:01:57 PM
MS Sans Serif
Arial
info_LastSavedBy
1/4/96 1:01:46 PM
Asymetrix Corporation
ASYM_TempViewer
Do not rename me 1
"D:\FOO.TBK"
Page id 6 of Book "G:\MTB40\CTB40R.SBK"
SYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_TempViewer
ASYM_CloseOnEsc
Do not rename me 2
ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK"
stbk_popViewers
ASYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_TempViewer
ASYM_CloseOnEsc
Do not rename me 3
ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK"
stbk_popViewers
ASYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_TempViewer
ASYM_CloseOnEsc
Do not rename me 4
ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK"
stbk_popViewers
ASYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_TempViewer
ASYM_CloseOnEsc
Do not rename me 5
ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK"
stbk_popViewers
ASYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_TempViewer
ASYM_CloseOnEsc
Do not rename me 6
ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK"
stbk_popViewers
ASYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_CloseOnEsc
Do not rename me 7
tbk_TempViewer
tbk_CloseOnEsc
stbk_popViewers
ASYM_itemOffset
closeWindow
closeWindow
SYSTEM stbk_popViewers
ASYM_itemOffset(
ASYM_TempViewer
ASYM_CloseOnEsc
buttonclick
buttonclick
Script
ToolBook 4.0 - Runtime HyperLink SysBookknk SysBookBook
Copyright
1995 Asymetrix Corporation
951205160027559914889115254
ASYM_TpID