This example shows the minimal implementation to call a MapBasic-routine.
Include "MapBasic.def"
Declare Sub Main
Declare Sub HelloWorld
'Ribbon SDK *************
Declare Sub EndHandler
Declare Method New_RibbonSDK Class "GeoAS.RibbonSDK.Addin" Lib "GeoAS.RibbonSDK.dll" Alias Ctor_CreateInstance() as This
Declare Method Initialize Class "GeoAS.RibbonSDK.Addin" Lib "GeoAS.RibbonSDK.dll" Alias Initialize(ByVal p1 as This, ByVal p2 as refptr, ByVal p3 as String)
Declare Method Unload Class "GeoAS.RibbonSDK.Addin" Lib "GeoAS.RibbonSDK.dll" Alias Unload(ByVal p1 as This)
Declare Function AddIn_Name() As String
Global myAddIn as This
'************************************************************************************
Sub Main
myAddIn = New_RibbonSDK()
call Initialize(myAddIn, SYSTEMINFO(SYS_INFO_IMAPINFOAPPLICATION), ApplicationName$() )
End Sub
'************************************************************************************
Sub EndHandler
call Unload(myAddIn)
End Sub
'************************************************************************************
Function AddIn_Name() As String
AddIn_Name = "HelloWorld"
End Function
'************************************************************************************
Sub HelloWorld
note "Hello World"
End Sub