1.随着鼠标移动显示地图坐标
procedure TForm1.Map1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
mScreenX, mScreenY : single; //屏幕坐标
mLon, mLat : double; //地图坐标
begin
mScreenX := X;
mScreenY := Y;
Map1.ConvertCoord(mScreenX, mScreenY, mLon, mLat, miScreenToMap);
end;
2.根据角度,坐标生成点,线,面
你的意思是在地图坐标上生成线和面,是吗?就是把几何图形投影到地图上去?