mapX中ADO的数据绑定的例子（ADO）
在form上放ADO控件，如果你想用ADO的话（建议），设置好连接，方法和普通数据库程序
开发也没什么两样，然后参考一下我下面的代码，添加数据集。
有了数据集，你就可以为所欲为了 ：），或查属性数据，或作专题图什么的，都可以了。
procedure TForm1.N30Click(Sender: TObject);
begin
ADOQuery1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:/工程/Delphi编程实践/MapXFengTai/database/ftycdb.mdb;Persist Security Info=False';
ADOQuery1.close;
ADOQuery1.Sql.Clear;
ADOQuery1.SQL.Add('Select * from 片区');
ADOQuery1.open;
ds := map1.datasets.Add(miDataSetADO,ADOQuery1.Recordset,'dsPQ','ph',Emptyparam,'片区图',Emptyparam,true);
end;
－－－－－－－－－－
经纬度也好办，map的mouseMove事件中能得到屏幕坐标x,y，下面程序能及时显示鼠标经纬度。
procedure TfrmMain.Map1MouseMove(Sender: TObject;
Shift: TShiftState;
X,
Y: Integer);
var
ScreenX,ScreenY : single;
mapXX,mapYY :do
uble;
begin
ScreenX := X;
ScreenY := Y;
map1.ConvertCoord(ScreenX,ScreenY,MapXX,MapYY,miScreenToMap);
StatusBar1.Panels.Items[0].Text := '经度：'+ format('%3.4f',[MapXX]);
StatusBar1.Panels.Items[1].Text := '纬度：'+ format('%3.4f',[MapYY]);
end;
