Ste*_*min 4 clojure clojurescript
我正在尝试用ClojureScript重写OpenLayers的示例用法.
Javascript源代码如下所示:
var map, layer;
map = new OpenLayers.Map('map');
layer = new OpenLayers.Layer.OSM("Simple OSM Map");
map.addLayer(layer);
var projection = new OpenLayers.Projection("EPSG:4326");
var center = new OpenLayers.LonLat(-71.147, 42.472).transform(projection, map.getProjectionObject());
map.setCenter(center, 12);
Run Code Online (Sandbox Code Playgroud)
我已经重写了这样的代码:
(ns hello.map)
(def mapp (.Map js/OpenLayers "map"))
(def layer (.Layer.OSM js/OpenLayers "Simple OSM Map"))
(.addLayer mapp layer)
(def projection (.Projection js/OpenLayers "EPSG:4326"))
(def center (.Transform (.LonLat js/OpenLayers -71.147 42.472) projection (.getProjectionObject mapp)))
(.setCenter mapp center 12)
Run Code Online (Sandbox Code Playgroud)
Lein生成以下代码:
var hello = {map:{}};
hello.map.mapp = OpenLayers.Map("map");
hello.map.layer = OpenLayers.Layer.OSM("Simple OSM Map");
hello.map.mapp.addLayer(hello.map.layer);
hello.map.projection = OpenLayers.Projection("EPSG:4326");
hello.map.center = OpenLayers.LonLat(-71.147, 42.472).Transform(hello.map.projection, hello.map.mapp.getProjectionObject());
hello.map.mapp.setCenter(hello.map.center, 12);
hello.hello = {};
Run Code Online (Sandbox Code Playgroud)
它不起作用.问题在于ClojureScript生成的代码没有new或者其他东西?
是的你的构造函数调用需要修复:
(ns hello.map)
(def mapp (js/OpenLayers.Map. "map"))
(def layer (js/OpenLayers.Layer.OSM. "Simple OSM Map"))
(.addLayer mapp layer)
(def projection (js/OpenLayers.Projection. "EPSG:4326"))
(def center (.transform (js/OpenLayers.LonLat. -71.147 42.472)
projection (.getProjectionObject mapp)))
(.setCenter mapp center 12)
Run Code Online (Sandbox Code Playgroud)
未经测试但你应该明白这一点.注意在实例上构造实例和调用方法之间的区别.
| 归档时间: |
|
| 查看次数: |
775 次 |
| 最近记录: |