Revision 4365 trunk/extensions/extCAD/sm/RectangleCADTool.sm

View differences:

RectangleCADTool.sm
31 31 
			SecondPointOrSquare {
32 32 
				setQuestion("Insertar punto de esquina opuesta o Cuadrado[C]");
33 33 
				setDescription(new String[]{"Cuadrado","Cancelar"});
34 
				addPoint(pointX,pointY);
34 
				addPoint( pointX,pointY,event);
35 35 
				}
36 36 

  		




  37
  37
  
    
	}


  		




  38
  38
  
    
SecondPointOrSquare{


  		




  39
  39
  
    
	addPoint( pointX:double,pointY:double,event:InputEvent)


  		




  40
  40
  
    
		FirstPoint {


  		




  41
  
  
    
			addPoint(pointX,pointY);


  		




  
  41
  
    
			addPoint(pointX,pointY,event);


  		




  42
  42
  
    
			end();


  		




  43
  43
  
    
			}


  		




  44
  44
  
    
	addOption(s:String)


  		




  ......




  53
  53
  
    
SecondPointSquare{


  		




  54
  54
  
    
	addPoint( pointX:double,pointY:double,event:InputEvent)


  		




  55
  55
  
    
		FirstPoint {


  		




  56
  
  
    
			addPoint(pointX,pointY);


  		




  
  56
  
    
			addPoint( pointX,pointY,event);


  		




  57
  57
  
    
			end();


  		




  58
  58
  
    
			}


  		




  59
  59
  
    
}


  		












Also available in:  Unified diff