Thread: Snap to a Road
View Single Post

  #2 (permalink)  
Old 03-06-2006
RobinX RobinX is offline
Junior Member
White Belt
 
Join Date: Mar 2006
Posts: 4
Hello wilfried !

First of all, thanks so much for your effort on the article !
Im pretty new with Delphi, so i was wondering if u could give
me some help, in using your code. I don't understand what your
function expects with : (ErrorProc: TOnError)


This is what i have done sofar :

- Saved your code to mp.pas
- Made a new project and added mp.pas to the project.


procedure TForm1.Button1Click(Sender: TObject);
var
mpx : TMapPoint;
d1, d2 : Double;
st : TStrings;
sx : String;
i : Integer;
begin
d1 := StrToFloat(Edit1.Text);
d2 := StrToFloat(Edit2.Text);

mpx.Create(); //<-- What to put here ?
mpx.GetStreetAddr(d1,d2,st,sx,i);
mpx.Destroy;
end;

I have no clue what to put behind mpx.Create(?). Is the rest of
the code the good way ? Would u be do kind to help me (Or anyone
else). I would love to see this working.

Once again, thanks for the article !

Regards
Reply With Quote