------------------------------------------------
Insert Code Below in Your App.Open Event
------------------------------------------------

UniHelp = New UniHelpEngine //Initialize UniHelp


------------------------------------------------
Customized Code for the Help Menu Item Handler
------------------------------------------------

Sub Action()

  Dim hlppage As FolderItem
  hlppage = UniHelp.HelpFolder.Child("000-Overview.htm") //Set FolderItem of the help page you want displayed.
  UniHelp.Run(hlppage) //Display selected page in UniHelp Viewer!

End Sub


------------------------------------------------
Customized Code for the UniHelpEngine.Constructor
------------------------------------------------

Sub Constructor()

  //**************************************
  // Edit the Properties Below to Customize UniHelp

  //Set autoset = TRUE for Default 700 x 400 centered window or
  //Set autoset = FALSE to set custom window width, height, etc.
  me.AutoSet = False

  //If autoset = FALSE, then customize UniHelp window size and positioning.
  UHelpWidth = 700
  UHelpHeight = 400
  UHelpTop = 80
  UHelpLeft = 50

  me.IconCategory = bookblue //TOC category icon
  me.IconCategoryOpen = bookblueopen //TOC open book icon
  me.IconPage = docwhite //TOC document icon
  me.FontName = "Academy Engraved LET" //Primary Default Font of UniHelp UI Elements.
  me.AltFont = "Academy Engraved LET" //Alternate Default Font of UniHelp UI Elements.

  // Assign the Text Size of UniHelp UI Elements, such as the TOC, Index, and Search list.
  // The default is 11, but you can choose a value within the range of 9-16.
  // For example, if your users need larger text that's very easy to read, try 14.
  me.FontSize = 12

  //Set to FALSE to only search TOC Topic Names, Keywords & Description.
  //     FALSE - Performs faster and provides greater control over search results.
  //Set to TRUE to search the TOC and the full text content of your help pages.
  //     TRUE - Performs a bit slower, but with broader, more comprehensive search results.
  me.UseFullTextSearch = True

  // If UseFullTextSearch=TRUE, then setting ShowSearchHighlights=TRUE
  // will highlight search matches in search-related help pages.
  // If UseFullTextSearch=FALSE, then ShowSearchHighlights is ignored.
  me.ShowSearchHighlights = False

  // Set ShowPrintButton=TRUE to enable Printing in UniHelp.
  // Set ShowPrintButton=FALSE to disable/remove Printing in UniHelp.
  // If set to TRUE, then clicking the Print Button fires the UniHelpGlobals.UHPrint method.
  me.ShowPrintButton = True

  //Set RBScript Context for optional UHScript feature.
  me.ScriptObject = 

  //Set to FALSE when using help pages in a standard folder.
  //Set to TRUE when using help pages bundled in a Virtual Volume.
  me.UseVirtualVolume = False

  If me.UseVirtualVolume then //Its a Virtual Volume.
    me.VVInitialize( "Help.vv" ) //Set filename of your VirtualVolume file.
  Else //Its a standard folder.
    me.HelpFolder = GetFolderItem("Help") //Set name of your help folder.
  End If

  me.HomePage = "000-Overview.htm" //Set Filename of the help page that will be the default home page.
  me.HelpTitle = "" //Set the window title of your help book.

  // Edit the Properties Above to Customize UniHelp
  //**************************************

End Sub
