瀏覽代碼

Initial version

michael 26 年之前
父節點
當前提交
cf58c3b5f4
共有 5 個文件被更改,包括 123 次插入0 次删除
  1. 4 0
      docs/search/filelist.txt
  2. 40 0
      docs/search/help.html
  3. 21 0
      docs/search/search.html
  4. 29 0
      docs/search/search.js
  5. 29 0
      docs/search/search2.js

+ 4 - 0
docs/search/filelist.txt

@@ -0,0 +1,4 @@
+..\user\*.html
+..\prog\*.html
+..\ref\*.html
+..\units\*.html

+ 40 - 0
docs/search/help.html

@@ -0,0 +1,40 @@
+<HTML>
+<HEAD>
+<TITLE>Free Pascal Manuals: Search Help</TITLE>
+</HEAD>
+<BODY BGCOLOR="#C0C0C0">
+<H1>Searching in the Free Pascal manual pages</H1>
+
+Searching in the manuals needs two steps :
+<OL>
+<LI>
+To search for words, type the words you want to search for in the
+top edit box. You can separate words with <TT>and</TT>, <TT>or</TT>
+and <TT>not</TT>. After you typed the words, press the <TT>Search</TT>
+button.
+
+For example, you could type the following:
+<PRE>
+reset or assign
+</PRE>
+This would then look for pages that have 'assign' or 'reset' in them.
+After pressing the <TT>SEARCH</TT> button, the output would look
+something like
+<IMG SRC="help1.gif">
+<P>
+When you press the <TT>SEARCH</TT> button, the 'hit total' will be displayed.
+This is the number of times your combination of words was found.
+<P>
+It is possible that no words are found, in that case the hit total will be zero,
+and there will be a line 'No records found' in the listbox, as shown below:
+<IMG SRC="help2.gif">
+<LI> When the search is complete, the lower listbox contains a list of section titles.
+You can select one of these titles, and press the <TT>GO</TT> button. A new browser
+window will open, showing the page that contains the help you requested.
+You can repeat this as many times as you want.
+</OL>
+<HR>
+<A HREf="search.html">Back</A> to search page.
+<HR>
+</BODY>
+</HTML>

+ 21 - 0
docs/search/search.html

@@ -0,0 +1,21 @@
+<HTML>
+<HEAD>
+   <TITLE>Free Pascal Manuals : Searching</TITLE>
+<Script language="javascript">
+var searchOpened = true;
+</script>
+</HEAD>
+<BODY BGCOLOR="#C0C0C0">
+
+<APPLET CODE="idksm.class" NAME="IDKSMSearchEngine"
+ ALT="Free Pascal search engine" WIDTH=300 HEIGHT=360
+ ALIGN=bottom archive="idksm.zip">
+<param name=cabbase value="idksm.cab">
+<param name=title value="Free Pascal">
+<param name=window value=FPCMainHelp>
+<param name=help value=help.html>
+<param name=volume value="fpchelp">
+<param name=noFrame value="true">
+</APPLET>
+</BODY>
+</HTML>

+ 29 - 0
docs/search/search.js

@@ -0,0 +1,29 @@
+var searchWindow;
+
+self.name = "FPCMainHelp";
+
+function reloadfile()
+	{
+	if (searchWindow.searchOpened)
+		;// don't do anything other than open the window.
+	else
+		searchWindow.location.replace("search/search.html");
+	searchWindow.focus();
+	}
+
+function opensearch()
+	{
+	if (parseInt(navigator.appVersion.charAt(0)) >= 4)
+		{
+		if (navigator.appName == "Netscape")
+			{
+			searchWindow = window.open("","searchwin","innerWidth=320,innerHeight=380,status=no");
+			reloadfile();
+			}
+		else if (navigator.appName.indexOf("Microsoft") != -1)
+			{
+			searchWindow = window.open("","searchwin","Width=320,Height=380,status=no");
+			reloadfile();
+			}
+		}
+	}

+ 29 - 0
docs/search/search2.js

@@ -0,0 +1,29 @@
+var searchWindow;
+
+self.name = "FPCMainHelp";
+
+function reloadfile()
+	{
+	if (searchWindow.searchOpened)
+		;// don't do anything other than open the window.
+	else
+		searchWindow.location.replace("../search/search.html");
+	searchWindow.focus();
+	}
+
+function opensearch()
+	{
+	if (parseInt(navigator.appVersion.charAt(0)) >= 4)
+		{
+		if (navigator.appName == "Netscape")
+			{
+			searchWindow = window.open("","searchwin","innerWidth=320,innerHeight=380,status=no");
+			reloadfile();
+			}
+		else if (navigator.appName.indexOf("Microsoft") != -1)
+			{
+			searchWindow = window.open("","searchwin","Width=320,Height=380,status=no");
+			reloadfile();
+			}
+		}
+	}