ThinkGeo.com    |     Documentation    |     Premium Support

How do I set the ZoomeLevel Scales on the webmap

#1

 What is the web equivalent of this:



With m_map.ZoomLevelSet
.ZoomLevel20.Scale = baseScale
.ZoomLevel19.Scale = baseScale * 2
.ZoomLevel18.Scale = baseScale * 4
.ZoomLevel17.Scale = baseScale * 8
.ZoomLevel16.Scale = baseScale * 16
.ZoomLevel15.Scale = baseScale * 32
.ZoomLevel14.Scale = baseScale * 64
.ZoomLevel13.Scale = baseScale * 128
.ZoomLevel12.Scale = baseScale * 256
.ZoomLevel11.Scale = baseScale * 512
.ZoomLevel10.Scale = baseScale * 1024
.ZoomLevel09.Scale = baseScale * 2048
.ZoomLevel08.Scale = baseScale * 4096
.ZoomLevel07.Scale = baseScale * 8192
.ZoomLevel06.Scale = baseScale * 16384
.ZoomLevel05.Scale = baseScale * 32768
.ZoomLevel04.Scale = baseScale * 65536
.ZoomLevel03.Scale = baseScale * 131072
.ZoomLevel02.Scale = baseScale * 262144
.ZoomLevel01.Scale = baseScale * 524288
End With


Thanx,


Rob



#2

Hi Robert,


In WebEdition, you can use the following code to customize your zoomlevels.


Dim newZoomLevelSet As New ZoomLevelSet()
newZoomLevelSet.ZoomLevel20.Scale = baseScale
' Other zoomlevels
newZoomLevelSet.ZoomLevel01.Scale = baseScale * 524288
Map1.SyncClientZoomLevels(newZoomLevelSet)


Regards,


Ivan