在Mapbasic中调用.chm帮助文件的方法

     今天查个人邮箱，收到一个好学网友的来信，说是用了我的Mapinfo“ADA_CDMA Tool ”插件，也正好在做这方面的事情，但却一直找不到在Mapbasic中调用.chm帮助文件的方法，现在将相关代码贴到这儿。

     对自己说：多沟通，多交流，多学习。

 

1. 创建一个 menu

 Create Menu "ADA_CDMATool Help" As
  "Help" Calling ADA_Help

 

2.

Sub ADA_Help
 Dim  ADAHelp_file As String

 

//help文件的位置

 ADAHelp_file = PathToDirectory$( ApplicationDirectory$( ) ) + "ADACDMAToolhelp.chm"   

 

//设置窗口   
 Set Window Help File ADAHelp_file
End Sub