home *** CD-ROM | disk | FTP | other *** search
/ Chip: Shareware for Win 95 / Chip-Shareware-Win95.bin / komunik / ie40 / ie4nt_s2.cab / IE4NT_2.CAB / MSHTML.DLL / 2110 / FORPAR.DLG < prev    next >
Encoding:
Text File  |  1997-07-12  |  7.7 KB  |  241 lines
  1. <HTML STYLE="font-family: ms sans serif; font-size: 8pt; width: 30.4em;
  2. height: 15em">
  3. <HEAD>
  4. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  5. <TITLE id=dialogTitle>
  6. Paragraph
  7. </TITLE>
  8. <SCRIPT>
  9. function getRadioStateCmd(radio, range)
  10. {
  11.  if (range.queryCommandEnabled(radio.value.substring(4)))
  12.  {
  13.   if(!range.queryCommandIndeterm(radio.value.substring(4)))
  14.   {
  15.    radio.checked
  16.     = range.queryCommandState(radio.value.substring(4));
  17.   }
  18.  }
  19. } 
  20. function getSelectStateCmd(select, range)
  21. {
  22.  var index;
  23.  var globalDoc = window.dialogArguments.document;
  24.  if (globalDoc.queryCommandSupported(select.id.substring(3)))
  25.  {
  26.   for (index = 0; index < select.options.length; index++)
  27.   {
  28.    if ((select.options[index].text)
  29.     == (range.queryCommandValue(select.id.substring(3))))
  30.    {
  31.     select.selectedIndex = index;
  32.     break;
  33.    }
  34.   }
  35.  }
  36. } 
  37. function initDialogCmd()
  38. {
  39.  var index;
  40.  var globalDoc = window.dialogArguments.document;
  41.  for (index = 0; index < document.all("radJustify").length; index++)
  42.  {
  43.   getRadioStateCmd(document.all("radJustify")[index],
  44.    globalDoc.selection.createRange());
  45.  }
  46.  getSelectStateCmd(cmdFormatBlock, globalDoc.selection.createRange());
  47. } 
  48. function setRadioStateCmd(radio, range)
  49. {
  50.  if (radio.checked != range.queryCommandState(radio.value.substring(4)))
  51.  {
  52.   if (range.queryCommandEnabled(radio.value.substring(4)))
  53.   {
  54.    range.execCommand(radio.value.substring(4));
  55.   }
  56.  }
  57. } 
  58. function setSelectStateCmd(select, range)
  59. {
  60.  var globalDoc = window.dialogArguments.document;
  61.  if (select.changed && (select.value != ""))
  62.  {
  63.   if (globalDoc.queryCommandSupported(select.id.substring(3)))
  64.   {
  65.    range.execCommand(select.id.substring(3), false,
  66.     select.options[select.selectedIndex].value);
  67.   }
  68.  }
  69. } 
  70. function closeDialogCmd()
  71. {
  72.  var index;
  73.  var globalDoc = window.dialogArguments.document;
  74.  for (index = 0; index < document.all("radJustify").length; index++)
  75.  {
  76.   setRadioStateCmd(document.all("radJustify")[index],
  77.    globalDoc.selection.createRange());
  78.  }
  79.  setSelectStateCmd(cmdFormatBlock, globalDoc.selection.createRange());
  80. } 
  81. function number(string)
  82. {
  83.  return parseFloat(string);
  84. } 
  85. function walkToText(doc)
  86. {
  87.  var currentRange;
  88.  var element;
  89.  while (("None" != doc.selection.type) && ("Text" != doc.selection.type))
  90.  {
  91.   currentRange = doc.selection.createRange();
  92.   element = currentRange.parentElement();
  93.   currentRange = getTextRange(element);
  94.   currentRange.select();
  95.  }
  96. } 
  97. function loadBdy()
  98. {
  99.  var globalDoc = window.dialogArguments.document;
  100.  document.onkeypress = new Function("defaultActions()");
  101.  document.onhelp  = new Function("callHelp()");
  102.  cmdFormatBlock.onchange = new Function("cmdFormatBlock.changed = true");
  103.  btnOK.onclick  = new Function("btnOKClick()");
  104.  btnCancel.onclick = new Function("btnCancelClick()");
  105.  walkToText(globalDoc);
  106.  initDialogCmd();
  107. } 
  108. function btnCancelClick()
  109. {
  110.  window.close();
  111. } 
  112. function btnOKClick()
  113. {
  114.  closeDialogCmd();
  115.  window.close();
  116. } 
  117. function defaultActions()
  118. {
  119.  var htmlKeyReturn = 13;
  120.  var htmlKeyEscape = 27;
  121.  if ((event.keyCode) == htmlKeyReturn)  
  122.  {
  123.    btnOKClick();
  124.  }
  125.  else if ((event.keyCode) == htmlKeyEscape) 
  126.  {
  127.   btnCancelClick();
  128.  }
  129. } 
  130. function callHelp()
  131. {
  132.  var L_NoHelp_Text = "No help topic available.";
  133.  var elm = window.event.srcElement;
  134.  if (null != elm.helpid)
  135.  {
  136.   if ("btnCancel" != elm.id)
  137.   {
  138.    alert(L_NoHelp_Text);
  139.   }
  140.   else
  141.   {
  142.    window.showHelp("windows.hlp", parseInt(elm.helpid));
  143.   }
  144.  }
  145. } 
  146. </SCRIPT>
  147. </HEAD>
  148. <BODY style="font-family: ms sans serif; font-size: 8pt;
  149. background: buttonface;" onLoad="loadBdy()">
  150. <DIV style="font-family: ms sans serif; font-size: 8pt; position: absolute;
  151. LEFT: 1em; TOP: 1em; WIDTH: 8em; HEIGHT: 1em">
  152. <LABEL For=cmdFormatBlock id=lblParaStyle tabIndex=-1>
  153. <U>P</U>aragraph Style
  154. </LABEL>
  155. </DIV>
  156. <SELECT id=cmdFormatBlock ACCESSKEY=p NAME="setCmdID" tabIndex=10
  157. style="font-family: ms sans serif; font-size: 8pt; LEFT: 1em; TOP: 2.5em;
  158. WIDTH: 27.7em; HEIGHT: 2.1em; position: absolute;">
  159. <OPTION id=none   VALUE="" selected>     </OPTION>
  160. <OPTION id=optNormal VALUE="<P>">  Normal   </OPTION>
  161. <OPTION id=optFormatted VALUE="<PRE>">  Formatted  </OPTION>
  162. <OPTION id=optAddress VALUE="<ADDRESS>"> Address   </OPTION>
  163. <OPTION id=optH1  VALUE="<H1>">  Heading 1  </OPTION>
  164. <OPTION id=optH2  VALUE="<H2>">  Heading 2  </OPTION>
  165. <OPTION id=optH3  VALUE="<H3>">  Heading 3  </OPTION>
  166. <OPTION id=optH4  VALUE="<H4>">  Heading 4  </OPTION>
  167. <OPTION id=optH5  VALUE="<H5>">  Heading 5  </OPTION>
  168. <OPTION id=optH6  VALUE="<H6>">  Heading 6  </OPTION>
  169. <OPTION id=optNumList VALUE="<OL>">  Numbered List </OPTION>
  170. <OPTION id=optBullet VALUE="<UL>">  Bulleted List </OPTION>
  171. <OPTION id=optDirList VALUE="<DIR>">  Directory List </OPTION>
  172. <OPTION id=optMenuList VALUE="<MENU>">  Menu List  </OPTION>
  173. <OPTION id=optDefTerm VALUE="<DT>">  Definition Term </OPTION>
  174. <OPTION id=optDef  VALUE="<DD>">  Definition  </OPTION>
  175. </SELECT>
  176. <TABLE cellspacing cellPadding=7 borderColorDark=buttonhighlight
  177. borderColorLight=buttonshadow border=1 noshade="yes"
  178. style="position:absolute;font-family: ms sans serif; font-size: 8pt;
  179. LEFT: 1em; TOP: 5.5em; WIDTH: 28em; HEIGHT: 3em">
  180. <TR>
  181.  <TD style="font-family: ms sans serif; font-size: 8pt;
  182.     LEFT: 0; TOP: 0; WIDTH: 19em; HEIGHT: 2em">
  183.  <DIV style="color: buttonface">a</DIV>
  184.  </TD>
  185. </TR>
  186. </TABLE>
  187.   <INPUT name=radJustify id=radJustifyLeft type=radio CHECKED
  188.   ACCESSKEY=l VALUE=_cmdJustifyLeft tabIndex=15
  189.   style="font-family: ms sans serif; font-size: 8pt; LEFT: 6.6em;
  190.   TOP: 6.5em; position: absolute; WIDTH: 1em; HEIGHT: 1em;">
  191.   <DIV style="font-family: ms sans serif; font-size: 8pt; position:
  192.   absolute;LEFT: 8.3em; TOP: 6.5em; WIDTH: 3em; HEIGHT: 1em">
  193.   <LABEL style="font-family: ms sans serif; font-size: 8pt"
  194.   For=radJustifyLeft id=lblJustifyLeft tabIndex="-1">
  195.   <U>L</U>eft
  196.   </LABEL>
  197.   </DIV>
  198.   <INPUT name=radJustify id=radJustifyCenter type=radio ACCESSKEY=c
  199.   VALUE=_cmdJustifyCenter tabIndex=20
  200.   style="font-family: ms sans serif; font-size: 8pt; LEFT: 12.1em;
  201.   TOP: 6.5em; position: absolute; WIDTH: 1em; HEIGHT: 1em">
  202.   <DIV style="font-family: ms sans serif; font-size: 8pt;
  203.   position: absolute;LEFT: 13.8em; TOP: 6.5em; WIDTH: 4em;
  204.   HEIGHT: 1em">
  205.   <LABEL style="font-family: ms sans serif; font-size: 8pt"
  206.   For=radJustifyCenter id=lblJustifyCenter tabIndex="-1">
  207.   <U>C</U>enter
  208.   </LABEL>
  209.   </DIV>
  210.   <INPUT name=radJustify id=radJustifyRight type=radio ACCESSKEY=r
  211.   VALUE=_cmdJustifyRight tabIndex=25
  212.   style="font-family: ms sans serif; font-size: 8pt; LEFT: 18.6em;
  213.   TOP: 6.5em; position: absolute; WIDTH: 1em; HEIGHT: 1em">
  214.   <DIV style="font-family: ms sans serif; font-size: 8pt;
  215.   position: absolute;LEFT: 20.3em; TOP: 6.5em; WIDTH: 3em;
  216.   HEIGHT: 1.3em">
  217.   <LABEL style="font-family: ms sans serif; font-size: 8pt"
  218.   For=radJustifyRight lblJustifyRight tabIndex="-1">
  219.   <U>R</U>ight
  220.   </LABEL>
  221.   </DIV>
  222. <DIV style="font-family: ms sans serif; font-size: 8pt; position: absolute;
  223. background: buttonface; HEIGHT: 1em; LEFT: 1.5em; TOP: 5em; WIDTH: 5em">
  224. <LABEL id=lblAlign tabIndex="-1"> Align Text</LABEL>
  225. </DIV>
  226. <BUTTON id=btnOK tabIndex=30
  227. style="font-family: ms sans serif; font-size: 8pt; LEFT: 14.4em; TOP: 9.5em;
  228. WIDTH: 6.8em; HEIGHT: 2.1em; position: absolute">
  229. OK</BUTTON>
  230. <!--
  231. <BUTTON id=btnClear onclick="btnClearClick()" tabIndex=35
  232. style="font-family: ms sans serif; font-size: 8pt; LEFT: 14.4em; TOP: 9.5em;
  233. WIDTH: 6.8em; HEIGHT: 2.1em; position: absolute">
  234. Clear All</BUTTON>
  235. -->
  236. <BUTTON id=btnCancel tabIndex=40
  237. style="font-family: ms sans serif; font-size: 8pt; LEFT: 22em; TOP: 9.5em;
  238. position: absolute; WIDTH: 6.8em; HEIGHT: 2.1em">
  239. Cancel</BUTTON>
  240. </BODY></HTML>
  241.