FiveTech Software tech support forums

Tanks George I think you need MapPoint software... I what I want am that she is free. I have solved it using WinHTTP windows services and the URL http://maps.google.es/maps... Example: Distance Madrid to Paris. local oHttp,cTextoHTML   Try  ...

I think you need MapPoint software and use their methods to get that info: You can try the following code: local hToolBar, hStandard, oMapPoint, nDist, oMap, oActiveoActive = TActiveX():New( oWnd, "MapPoint.Control.16" ...

George,

Yea!

Just for clarity, I would change this line:

oMap := oActiveX:Do( "Newmap", 1 )

To this:

oActiveX:Do( "Newmap", 1 )

Congratulations on getting it working.

James

Now is working fine after I am using FWH 9.04 + XHarbour Builder Pro Sep08 This is the code: local hToolBar, hStandard, oMapPoint, nDist, oMap oActiveX = TActiveX():New( oWnd, "MapPoint.Control.16" ) oMap := oActiveX:Do( "Newmap", 1 ) hToolBar = oActiveX:GetProp( ...

By using the following code: local hToolBar, hStandard, oMapPoint, nDist, oMap oActiveX = TActiveX():New( oWnd, "MapPoint.Control.16" ) oWnd:oClient = oActiveX // To fill the entire window surface oMap := oActiveX:Do( "Newmap", ...

Check the valtype() of oMap right after it is created. From the error method it looks like it is a number.

msgInfo( valtype( oMap ) )

James

I am getting the following message: Error description: Error BASE/1004 Class: 'NUMERIC' has no exported method: FINDRESULTS Args: [ 1] = N 0 [ 2] = C 205 Broadway, Lawrence, MA I am using FWH 9.06 + xHarbour Builder pro (Sep 08). Xharbou Pro uses PellesC not Borland. Regards, George

oMap := oActiveX:Do("ActiveMap")
ou
oMap := oActiveX:GetProp("ActiveMap")

what is your version of fwh ?

Lailton
I tried different approach but there are not working.
I am getting the same message
Error description: Error BASE/1004 Message not found: TACTIVEX:ACTIVEMAP

I think is more easy to get the distance by using google map API.

Regards,


George

Try it. oMap := oActiveX:Do("ActiveMap") oStartLocation:= oMap:FindResults("205 Broadway, Lawrence, MA"):Item(1) oEndLocation:= oMap:FindResults("77 Centre Street, Boston, MA"):Item(1)  oActiveX&#0...

Hi James,
Mappoint program open OK but now we get the error mesage in oMap := oActiveX:ActiveMap

Error description: Error BASE/1004 Message not found: TACTIVEX:ACTIVEMAP

Regards,

George

George, Try this: local hToolBar, hStandard, oMapPoint, nDist, oMap oActiveX = TActiveX():New( oWnd, "MapPoint.Control.16" ) oWnd:oClient = oActiveX // To fill the entire window surface oActiveX:Do( "Newmap", 1 ) hToolBar ...

James, Your suggestion seem logic but using the below code I get run mappoint but also the same error message: Error description: Error BASE/1004 Message not found: TACTIVEX:FINDRESULTS local hToolBar, hStandard, oMapPoint, nDist oActiveX = TActiveX():New( ...

George, As I said the locations have to be objects. Try this: oStartLocation:= oActiveX:FindResults("205 Broadway, Lawrence, MA"):Item(1) oEndLocation:= oActiveX:FindResults("77 Centre Street, Boston, MA"):Item(1) msgInfo( oActiveX:Distance( oStartLocation, oEndLoc...

George

where i do download this SDK ?

send link i make download and make translation it for you.

gracias