I tested your suggestion, it works great!
This is a discussion on Access some hidden features in MapPoint2002 ActiveX control within the MapPoint Desktop Discussion forums, part of the Map Forums category; Sergiy I tested your suggestion, it works great! Thank you, David...
thanks for keeping me informed.
Not sure if "Can you bring up the Window for routing preference" means "More Options" from MP2002 "Route" menu, but if that what you want, then use
and you'll get it.
im developing an application with the mapPoint Control, in Visual Basic.Net. Im' trying to learn anything i can find about the MapPoint. Please can you say me where find information about undocumented features like the one you used?
Thankyou in Advance
Originally Posted by baal_2000
Unfortunately, no secrert sources are known to me, except this very forum :)
Let us know if you find one!
can you add the function to bring up the open file window, i.e. under the menu File -> Open?
I need the open file window to open a map file in *.est, *.ptt, *.sst etc.
Or there are an alternative way to open these files saved by Street & Trips?
Any suggestions are appreciated very much.
Not every command could be activated, by now.
I am keeping trying....
I get "Compile error: variable not defined" until I comment out these 3 variables.
Thanks for this great extension to the Map Point ActiveX control.
It might be stuff left from the project that I was actually cutting the example from.
I am in process of updating it, will let you know when the update is ready to download.
I will greatly appreciate that.
In order to get the extensions to work with an Access form (in fact one that not only has the MapPoint Control, but also a sub-form placed on it), I had to modify the "FindChildWindow" procedure to search through each child window's children:
Code:Public Function FindChildWindow(ByVal szClass As String, _ ByVal szTitle As String, _ Optional ByVal bExactMatch As Boolean = True) As TWindow Dim hWndC As Long Dim TWin As TWindow, TWinGrandChild As TWindow, bFoundGrandChild As Boolean Set TWin = New TWindow Set TWinGrandChild = New TWindow If bExactMatch Then TWin.hWnd = FindWindowEx(mvarhWnd, 0, szClass, szTitle) Else TWin.hWnd = GetWindow(mvarhWnd, GW_CHILD) Do While TWin.Valid If vbNullString = szTitle Then If InStr(1, TWin.ClassName, szClass) <> 0 Then Exit Do End If Else If InStr(1, TWin.Caption, szTitle) <> 0 Then Exit Do End If End If TWinGrandChild.hWnd = GetWindow(TWin.hWnd, GW_CHILD) Do While TWinGrandChild.Valid If vbNullString = szTitle Then If InStr(1, TWinGrandChild.ClassName, szClass) <> 0 Then bFoundGrandChild = True Exit Do End If Else If InStr(1, TWinGrandChild.Caption, szTitle) <> 0 Then bFoundGrandChild = True Exit Do End If End If TWinGrandChild.hWnd = GetWindow(TWinGrandChild.hWnd, GW_HWNDNEXT) Loop If bFoundGrandChild Then Exit Do End If TWin.hWnd = GetWindow(TWin.hWnd, GW_HWNDNEXT) Loop End If If Not TWin.Valid Then Set TWin = Nothing End If If bFoundGrandChild Then Set FindChildWindow = TWinGrandChild Else Set FindChildWindow = TWin End If End Function
Newer version of the ActiveX control extension is under preparation.
It enables few more MapPoint commands: Save_As_Web_Page,
Page_Setup, etc. Download the compiled executable file to find them all,
as well as to help me check if everything works smoothly:
The executable should work on any Windows system with MapPoint2002
and VB6 runtime pre-installed. NorthAmerica runs MaplePoint_NA.exe,
Europe - MaplePoint_EUR.exe
All the application's menu commands are implemented through WinAPI
calls, even those accessible via existing COM interface: i am testing the
technique itself, not the particular set of commands.
There are currently 1 users browsing this thread. (0 members and 1 guests)