3. MapBasic x64

Ribbon sample (new)

1.Complie this new code with MapBasic x64 compiler

2.Create your interface with the Ribbon Designer and store the [MyApp].resources.xml in the MBX folder.

click to enlarge

click to enlarge

click to enlarge

click to enlarge

code example MyApp.recources.xml

3.Start MapInfo Pro 64-Bit

4.Start your application MBX

menue_sample_new

declare sub Main

declare sub mShow

declare sub mTheme

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 EndHandler

call Unload(myAddIn)

End Sub

'******************************

Function AddIn_Name() As String

AddIn_Name = "MyApp"

End Function

'********************************

sub Main

'Create Menu "MyApp" as

' "Show" calling mShow,

' "Theme" calling mTheme

'Alter Menu bar add "MyApp"

myAddIn = New_RibbonSDK()

call Initialize(myAddIn, SYSTEMINFO(SYS_INFO_IMAPINFOAPPLICATION), ApplicationName$() )

end sub

'********************************

sub mShow

note "Show"

end sub

'********************************

sub mTheme

note "Theme"

end sub

'********************************