var tocTab = new Array();var ir=0;
tocTab[ir++] = new Array ("1", "Introduction", "", "", "cicon1.gif", "cicon2.gif");
tocTab[ir++] = new Array ("1.1", "Welcome topic", "welcometopic.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("1.2", "History", "secondtopic.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("1.3", "FAQ", "faq.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2", "Programming with Pascal", "", "", "cicon1.gif", "cicon2.gif");
tocTab[ir++] = new Array ("2.1", "Exceptions", "exceptions.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.2", "Arithmetic operators", "arithmeticoperators.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.3", "Constant expressions", "constantexpressions.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.4", "Declaring variables", "declaringvariables.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.5", "Local declaration", "localdeclaration.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.6", "Parameters", "parameters.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.7", "Function declaration", "functiondeclaration.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.8", "Overview", "overview.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9", "Syntax", "", "", "cicon1.gif", "cicon2.gif");
tocTab[ir++] = new Array ("2.9.1", "AND", "and.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.2", "ARRAY", "array.htm", "", "cicon1.gif", "cicon2.gif");
tocTab[ir++] = new Array ("2.9.2.1", "Dynamic arrays", "dynamicarrays.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.2.2", "Static arrays", "staticarrays.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.3", "AS", "as.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.4", "BEGIN", "begin.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.5", "CASE", "case.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.6", "CHR", "chr.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.7", "CLASS", "class.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.8", "CONST", "const.htm", "", "cicon1.gif", "cicon2.gif");
tocTab[ir++] = new Array ("2.9.8.1", "Typed constants", "typedconstants.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.8.2", "True constants", "trueconstants.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.9", "#CONSTRUCTOR", "constructor.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.10", "#DESTRUCTOR", "destructor.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.11", "DIV", "div.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.12", "DO", "do.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.13", "DOWNTO", "downto.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.14", "ELSE", "else.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.15", "END", "end.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.16", "EXCEPT", "except.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.17", "EXIT", "exit.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.18", "EXPORT", "export.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.19", "EXTERNAL", "external.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.20", "FINALLY", "finally.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.21", "FOR", "for.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.22", "FORWARD", "forward.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.23", "FUNCTION", "function.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.24", "GOTO", "goto.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.25", "IF", "if.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.26", "IMPLEMENTATION", "implementation.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.27", "IN", "in.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.28", "INHERITED", "inherited.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.29", "INTERFACE", "interface.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.30", "IS", "is.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.31", "LABEL", "label.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.32", "MOD", "mod.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.33", "NIL", "nil.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.34", "NOT", "not.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.35", "OF", "of.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.36", "OR", "or.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.37", "ORD", "ord.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.38", "OUT", "out.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.39", "OVERRIDE", "override.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.40", "PRIVATE", "private.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.41", "PROCEDURE", "procedure.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.42", "PROGRAM", "program.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.43", "PROPERTY", "property.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.44", "PROTECTED", "protected.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.45", "PUBLIC", "public.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.46", "PUBLISHED", "published.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.47", "RECORD", "record.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.48", "REPEAT", "repeat.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.49", "SET", "set.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.50", "SHL", "shl.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.51", "SHR", "shr.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.52", "THEN", "then.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.53", "TO", "to.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.54", "TRY", "try.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.55", "TYPE", "type.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.56", "UNIT", "unit.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.57", "UNTIL", "until.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.58", "USES", "uses.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.59", "VAR", "var.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.60", "VIRTUAL", "virtual.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.61", "WHILE", "while.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.62", "WITH", "with.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("2.9.63", "XOR", "xor.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("3", "Web scripting", "webscripting.htm", "", "cicon1.gif", "cicon2.gif");
tocTab[ir++] = new Array ("3.1", "Script calling methods", "scriptcallingmethods.htm", "", "cicon9.gif", "cicon9.gif");
tocTab[ir++] = new Array ("3.2", "Inserting scripts in html file", "insertingscriptsinhtmlfile.htm", "", "cicon9.gif", "cicon9.gif");
isContent = true,
isIndex = false,
showNumbers = true,
tocBehaviour = new Array(1,1),
tocScroll=true,
tocLinks = new Array(0,0);
var oldOnError = null;
var isDyn = navigator.userAgent.toLowerCase().indexOf("opera") == -1;
var isIE = navigator.appName.toLowerCase().indexOf("explorer") > -1;
var oldCurrentNumber = "", oldLastVisitNumber = "";
var toDisplay = new Array();
for (ir=0; ir<tocTab.length; ir++) {
toDisplay[ir] = tocTab[ir][0].split(".").length==1;
}
function windowErr() {
isDyn = false;
$hmtoc.location.href = "ipi_content.htm";
window.onerror = oldOnError;
}
function reDisplay(currentNumber,tocChange,noLink,e) {
if (isIndex && ($hmtoc.location.href.substring($hmtoc.location.href.lastIndexOf("/")+1,$hmtoc.location.href.length) != "ipi_kwindex.htm")) { isIndex=false; isContent=true; }
if (currentNumber == "navIndex") { isContent=false; }
if (currentNumber == "navContent") { isIndex=false; isContent=true; }
if (e) {
ctrlKeyDown = (isIE) ? e.ctrlKey : (e.modifiers==2);
if (tocChange && ctrlKeyDown) tocChange = 2;
}
var currentNumArray = currentNumber.split(".");
var currentLevel = currentNumArray.length-1;
var currentIndex = 1;
var currentHash = "";
if ((currentNumber == "") && (top.location.href.lastIndexOf("?") > 0)) {
currentNumber = top.location.href.substring(top.location.href.lastIndexOf("?")+1,top.location.href.length);
if (currentNumber.lastIndexOf(",") > 0) {
currentHash = "#" + currentNumber.substring(currentNumber.lastIndexOf(",")+1, currentNumber.length);
currentNumber = currentNumber.substring(0, currentNumber.lastIndexOf(","));
}
}
for (i=0; i<tocTab.length; i++) {
if ((tocTab[i][0] == currentNumber) || (tocTab[i][2] == currentNumber && tocTab[i][2] != "")) {
currentIndex = i;
currentNumber = tocTab[i][0];
currentNumArray = currentNumber.split(".");
currentLevel = currentNumArray.length-1;
break;
}
}
if (currentIndex < tocTab.length-1) {
nextLevel = tocTab[currentIndex+1][0].split(".").length-1;
currentIsExpanded = nextLevel > currentLevel && toDisplay[currentIndex+1];
}
else currentIsExpanded = false;
theHref = (noLink) ? "" : tocTab[currentIndex][2] + currentHash;
theTarget = tocTab[currentIndex][3];
for (i=1; i<tocTab.length; i++) {
if (tocChange) {
thisNumber = tocTab[i][0];
thisNumArray = thisNumber.split(".");
thisLevel = thisNumArray.length-1;
isOnPath = true;
if (thisLevel > 0) {
for (j=0; j<thisLevel; j++) {
isOnPath = (j>currentLevel) ? false : isOnPath && (thisNumArray[j] == currentNumArray[j]);
}
}
toDisplay[i] = (tocChange == 1) ? isOnPath : (isOnPath || toDisplay[i]);
if (thisNumber.indexOf(currentNumber+".")==0 && thisLevel > currentLevel) {
if (currentIsExpanded) toDisplay[i] = false;
else toDisplay[i] = (thisLevel == currentLevel+1);
}
}
}
if (!isContent && !isIndex) {
$hmtoc.location.href = "ipi_kwindex.htm";
isIndex = true;
}
hasSelection = false;
if (isContent) {
if (!isDyn) {
if ($hmtoc.location.href.substring($hmtoc.location.href.lastIndexOf("/")+1,$hmtoc.location.href.length) != "ipi_content.htm") $hmtoc.location.href = "ipi_content.htm";
}
else {
oldOnError = window.onerror;
window.onerror = windowErr;
$hmtoc.document.clear();
$hmtoc.document.write("<html>\n\r<head></head>\n\r<style type=\"text/css\">\n\r       SPAN.heading1 { font-family: Helvetica,Arial; font-weight: normal; font-size: 10pt; color: #000000; text-decoration: none }\n\r       SPAN.heading2 { font-family: Helvetica,Arial; font-weight: normal; font-size: 9pt; color: #000000; text-decoration: none }\n\r       SPAN.heading3 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #000000; text-decoration: none }\n\r       SPAN.heading4 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #000000; text-decoration: none }\n\r       SPAN.heading5 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #000000; text-decoration: none }\n\r       SPAN.heading6 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #000000; text-decoration: none }\n\r\n\r       SPAN.hilight1 { font-family: Helvetica,Arial; font-weight: normal; font-size: 10pt; color: #FFFFFF; background: #002682; text-decoration: none }\n\r       SPAN.hilight2 { font-family: Helvetica,Arial; font-weight: normal; font-size: 9pt; color: #FFFFFF; background: #002682; text-decoration: none }\n\r       SPAN.hilight3 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #FFFFFF; background: #002682; text-decoration: none }\n\r       SPAN.hilight4 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #FFFFFF; background: #002682; text-decoration: none }\n\r       SPAN.hilight5 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #FFFFFF; background: #002682; text-decoration: none }\n\r       SPAN.hilight6 { font-family: Helvetica,Arial; font-weight: normal; font-size: 8pt; color: #FFFFFF; background: #002682; text-decoration: none }\n\r</style>\n\r<body bgcolor=\"#FFFFFF\">\n\r  <font face=\"Helvetica,Arial\" size=\"4\"><b>\n\rtitle of this help project\n\r  </b></font>\n\r  <br>\n\r  <br>\n\r\n\r  <!-- Place holder for the TOC, do not delete the line below -->\n\r  ");
for (i=0; i<tocTab.length; i++) {
if (toDisplay[i]) {
thisNumber = tocTab[i][0];
thisNumArray = thisNumber.split(".");
thisLevel = thisNumArray.length-1;
isCurrent = (i == currentIndex);
if (i < tocTab.length-1) {
nextLevel = tocTab[i+1][0].split(".").length-1;
img = (thisLevel >= nextLevel) ? tocTab[i][4] : ((toDisplay[i+1]) ? tocTab[i][5] : tocTab[i][4]);
}
else img = tocTab[i][4];
thisTextClass = ((thisNumber==currentNumber)?("hilight"):("heading"));
thisNode = ((thisNumber==currentNumber)?("<div id=currentNode></div>"):(""));
if (thisNumber==currentNumber) hasSelection = true;
$hmtoc.document.write(thisNode);
$hmtoc.document.write("<table border=0 cellspacing=0 cellpadding=2>");
if (img!="") {
$hmtoc.document.write("<tr><td width=" + ((thisLevel+1) * 20) + " align=right valign=top>");
$hmtoc.document.write("<a href=\"javaScript:history.go(0)\" onMouseDown=\"parent.reDisplay('" + thisNumber + "'," + tocBehaviour[0] + "," + tocLinks[0] + ",event)\">");
$hmtoc.document.write("<img src=\"" + img + "\" border=0></a>");
}
else $hmtoc.document.write("<tr><td width=" + (thisLevel * 20) + " align=right valign=top>");
$hmtoc.document.write("</td><td align=left>");
$hmtoc.document.write("<a href=\"javaScript:history.go(0)\" onMouseDown=\"parent.reDisplay('" + thisNumber + "'," + tocBehaviour[1] + "," + tocLinks[1] + ",event)\">");
$hmtoc.document.write("<span class=\""  + thisTextClass + ((thisLevel>5) ? 6 : thisLevel+1) + "\">");
$hmtoc.document.write( ((showNumbers)?(thisNumber+" "):"") + tocTab[i][1]);
$hmtoc.document.write("</span></a>");
$hmtoc.document.writeln("</td></tr></table>");
window.onerror = oldOnError;
} //isDyn
} //isContent
}
}
if (!noLink) {
oldLastVisitNumber = oldCurrentNumber;
oldCurrentNumber = currentNumber;
}
if (isContent && isDyn) {
$hmtoc.document.write("\n\r\n\r  <br>\n\r  <hr>\n\r  <font face=\"Helvetica,Arial\" size=\"1\">\n\r&copy; 2001 ... your company\n\r  </font>\n\r</body>\n\r</html>\n\r");
$hmtoc.document.close();
}
if (theHref)
if (theTarget=="top") top.location.href = theHref;
else if (theTarget=="parent") parent.location.href = theHref;
else if (theTarget=="blank") open(theHref,"");
else {
$hmcontent.location.href = theHref;
if ((tocScroll) && (hasSelection)) $hmtoc.document.all["currentNode"].scrollIntoView();
}
}
