Revision 3828 trunk/extensions/extCAD/sm/PointCADTool.sm

View differences:

PointCADTool.sm
9 9
%class PointCADTool
10 10
%package com.iver.cit.gvsig.gui.cad.tools.smc
11 11
%import com.iver.cit.gvsig.gui.cad.tools.PointCADTool
12
%import com.iver.cit.gvsig.fmap.layers.FBitSet
13 12

  
14 13

  
15 14
%map ExecuteMap
......
27 26

  
28 27
	{
29 28

  
30
		addPoint(sel:FBitSet,pointX:double,pointY:double)
29
		addPoint( pointX:double,pointY:double)
31 30
			First {
32 31
				setQuestion("Insertar punto");
33
				addPoint(sel,pointX,pointY);
32
				addPoint( pointX,pointY);
34 33
				}
35 34
	}
36 35
First{
37
	addPoint(sel:FBitSet,pointX:double,pointY:double)
36
	addPoint( pointX:double,pointY:double)
38 37
		First {
39 38
			setQuestion("Insertar punto");
40
			addPoint(sel,pointX,pointY);
39
			addPoint( pointX,pointY);
41 40
			}
42 41
}
43 42
Default

Also available in: Unified diff