← Back to branch summary

~mortenoh/+junk/dhis2-detailed-import-export

« back to all changes in this revision

Viewing changes to gis/dhis-gis-geostat/mfbase/openlayers/tests/Control/DragPan.html

  • Committer: larshelge at gmail
  • Date: 2009-03-03 16:46:36 UTC
  • Revision ID: larshelge@gmail.com-20090303164636-2sjlrquo7ib1gf7r
Initial check-in

Show diffs side-by-side

added added

removed removed

Lines of Context:
gis/dhis-gis-geostat/mfbase/openlayers/tests/Control/DragPan.html
 
1
<html>
 
2
<head>
 
3
  <script src="../../lib/OpenLayers.js"></script>
 
4
  <script type="text/javascript">
 
5
    var map, control, layer; 
 
6
 
 
7
    function init_map() {
 
8
        control = new OpenLayers.Control.DragPan();
 
9
        map = new OpenLayers.Map("map", {controls:[control]});
 
10
        layer = new OpenLayers.Layer.WMS( "OpenLayers WMS", 
 
11
                    "http://labs.metacarta.com/wms/vmap0",
 
12
                    {layers: 'basic'} );
 
13
        map.addLayer(layer); 
 
14
        map.zoomToMaxExtent();
 
15
        map.zoomIn();
 
16
        control.activate();
 
17
        return [map, control];
 
18
    }    
 
19
    function test_Control_DragPan_constructor (t) {
 
20
        t.plan( 1 );
 
21
    
 
22
        control = new OpenLayers.Control.DragPan();
 
23
        t.ok( control instanceof OpenLayers.Control.DragPan, "new OpenLayers.Control returns object" );
 
24
    }
 
25
    function test_Control_DragPan_drag (t) {
 
26
        t.plan(4);
 
27
        var data = init_map();
 
28
        map = data[0]; control = data[1];
 
29
        res = map.baseLayer.resolutions[map.getZoom()];
 
30
        t.eq(map.center.lat, 0, "Lat is 0 before drag");
 
31
        t.eq(map.center.lon, 0, "Lon is 0 before drag");
 
32
        map.events.triggerEvent('mousedown', {'type':'mousedown', 'xy':new OpenLayers.Pixel(0,0), 'which':1});
 
33
        map.events.triggerEvent('mousemove', {'type':'mousemove', 'xy':new OpenLayers.Pixel(5,5), 'which':1});
 
34
        map.events.triggerEvent('mouseup', {'type':'mouseup', 'xy':new OpenLayers.Pixel(5,5), 'which':1});
 
35
        
 
36
        t.eq(map.getCenter().lat, res * 5, "Lat is " + (res * 5) + " after drag");
 
37
        t.eq(map.getCenter().lon, res * -5, "Lon is " + (res * -5) + " after drag");
 
38
    }
 
39
    function test_Control_DragPan_click(t) {
 
40
        t.plan(1);
 
41
        var control = new OpenLayers.Control.DragPan();
 
42
        var map = new OpenLayers.Map("map", {controls:[control]});
 
43
        var layer = new OpenLayers.Layer.WMS("OpenLayers WMS", 
 
44
                                        "http://labs.metacarta.com/wms/vmap0",
 
45
                                        {layers: 'basic'});
 
46
        map.addLayer(layer); 
 
47
        map.zoomToMaxExtent();
 
48
        map.zoomIn();
 
49
        control.activate();
 
50
        map.setCenter = function() {
 
51
            t.ok(false, "map.setCenter should not be called here");
 
52
        };
 
53
        var xy = new OpenLayers.Pixel(0, 0);
 
54
        var down = {
 
55
            'type': 'mousedown',
 
56
            'xy': xy,
 
57
            'which': 1
 
58
        };
 
59
        var move = {
 
60
            'type': 'mousemove',
 
61
            'xy': xy,
 
62
            'which': 1
 
63
        };
 
64
        var up = {
 
65
            'type': 'mouseup',
 
66
            'xy': xy,
 
67
            'which': 1
 
68
        };
 
69
        map.events.triggerEvent('mousedown', down);
 
70
        map.events.triggerEvent('mousemove', move);
 
71
        map.events.triggerEvent('mouseup', up);
 
72
        t.ok(true, "clicking without moving the mouse does not call setCenter");
 
73
    }
 
74
    
 
75
 
 
76
  </script>
 
77
</head>
 
78
<body>
 
79
    <a id="scale" href="">DragPan</a> <br />
 
80
    <div id="map" style="width: 1024px; height: 512px;"/>
 
81
</body>
 
82
</html>