ftexampl1.js

非常好的JAVASCRIPT树型

iconFolder = "../../images/" 
ftFolder = "../../"
modalClick = true
initialMode = 2
mouseOverIconMode = 1
menuHeader = "<B><CENTER>Header<BR><IMG SRC = '../../images/modem.gif'></CENTER></B>"
menuFooter = "<B><CENTER>Footer<BR><IMG SRC = '../../images/modem.gif'></CENTER></B>"
defFolderFont = "<font>"
defDocFont = "<font face=Arial size=2 color=008080>" 
levelDefFont[0] = "<font face=Arial size=4 color=008080>"
levelDefFont[1] = "<font face=Arial size=3 color=008080>" 
levelDefFont[2] = "<font face=Arial size=2 color=008080>" 
levelDefFont[3] = "<font face=Arial size=1 color=008080>" 
levelDefFont[4] = "<font face=Arial STYLE='font-size:6pt' color=008080>" 
addImage("globe","globe.gif")
addImage("modem","modem.gif")
addImage("money","money.gif")

fT = gFld("<i>Been There</i>", "ftbase.htm")
	aux1 = insFld(fT, gFld("Europe", "ftbase2.htm"))
	aux1.setIcon("money","modem")
	      aux2 = insFld(aux1, gFld("United Kingdom", "ftbase3.htm"))
		aux2.setIcon("money","modem","modem","money")
		      aux3 = insFld(aux2, gFld("Scotland", "ftbase.htm"))
			aux3.setIcon("globe","globe")
				insDoc(aux3, gLnk("Edinburgh", "ftbase2.htm"))
 			insDoc(aux2, gLnk("London", "ftbase3.htm"))
	      aux2 = insFld(aux1, gFld("Germany", "ftbase.htm"))
 			insDoc(aux2, gLnk("Munich", "ftbase2.htm"))
	      aux2 = insFld(aux1, gFld("Greece", "ftbase3.htm"))
			aux2.setFont("<font face=Arial size=4 color=008080>")
			aux2.setInitial(true)
		aux3 = insDoc(aux2, gLnk("Athens", "ftbase2.htm"))
			aux3.setStatusBar("Go to Athens")
	      aux2 = insFld(aux1, gFld("Italy", "ftbase3.htm"))
		      aux3 = insFld(aux2, gFld("Tuscany", "ftbase.htm"))	
			insDoc(aux3, gLnk("Florence", "ftbase.htm"))
			aux3.setFont("<font face=Arial size=4 color=008080>")
			insDoc(aux3, gLnk("Pisa", "ftbase2.htm"))
			insDoc(aux2, gLnk("Rome", "ftbase3.htm"))
	      aux2 = insFld(aux1, gFld("Portugal", "ftbase.htm"))
 			insDoc(aux2, gLnk("Lisboa", "ftbase.htm"))
     aux1 = insFld(fT, gFld("America", "ftbase2.htm"))
	      aux2 = insFld(aux1, gFld("Canada", "ftbase3.htm"))
 			insDoc(aux2, gLnk("Montreal", "ftbase.htm"))
	      aux2 = insFld(aux1, gFld("United States", "ftbase2.htm"))
 			insDoc(aux2, gLnk("Boston", "ftbase3.htm"))
 			insDoc(aux2, gLnk("New York", "ftbase.htm"))
 			insDoc(aux2, gLnk("Washington", "ftbase2.htm"))