home *** CD-ROM | disk | FTP | other *** search
/ PC Home 49 / PC_Home_Issue_49.iso / lldemo / lldemo.shr / ROSETTA.EXE / ROSETTA.DXR / 00204.ls < prev    next >
Encoding:
Text File  |  1996-06-24  |  942 b   |  24 lines
  1. on LaunchHelp
  2.   global gStuMethod
  3.   set acrobatReader to getaProp(gStuMethod, #acrobatPath)
  4.   if voidp(acrobatPath) or not stringp(acrobatPath) then
  5.     set acrobatPath to "C:\ACROREAD\ACROREAD.EXE"
  6.   end if
  7.   set acrobatObj to FileIO(mnew, "read", acrobatReader)
  8.   if objectp(acrobatObj) then
  9.     acrobatObj(mdispose)
  10.     open(the pathName & "UG.PDF", acrobatReader)
  11.   else
  12.     alert("Please locate ACROREAD.EXE. If you have not installed Acrobat Reader, please do so before using the online User's Guide.")
  13.     set acrobatObj to FileIO(mnew, "?read", "exe")
  14.     if objectp(acrobatObj) then
  15.       set acrobatReader to acrobatObj(mFileName)
  16.       acrobatObj(mdispose)
  17.       setaProp(gStuMethod, #acrobatPath, acrobatReader)
  18.       open(the pathName & "UG.PDF", acrobatReader)
  19.     else
  20.       alert("In order to view the online User's Guide, please run the Acrobat Reader Installer located on The Rosetta Stone CD-ROM.")
  21.     end if
  22.   end if
  23. end
  24.