Polygon.st
changeset 1430 baf6bfed6d56
parent 1303 6ca5f36cdc63
child 2091 24965fa2be83
equal deleted inserted replaced
1429:e1e361ad20bf 1430:baf6bfed6d56
   126     "
   126     "
   127      Polygon vertices:(Array with:10@10
   127      Polygon vertices:(Array with:10@10
   128                              with:20@20
   128                              with:20@20
   129                              with:30@30)
   129                              with:30@30)
   130 
   130 
   131      Polygon vertices:(#(10 10  100 0  50 50) pairWiseCollect:[:x :y | x @ y])
   131      Polygon vertices:(#(10 10  100 0  50 50) pairWiseCollect:[:x :y | x @ y]).
       
   132     "
       
   133 
       
   134     "
       
   135      |p v|
       
   136 
       
   137      v := View new openAndWait.
       
   138      p := Polygon 
       
   139             vertices:(Array with:10@10
       
   140                             with:20@10
       
   141                             with:20@30).
       
   142      p displayOn:v
   132     "
   143     "
   133 
   144 
   134     "Modified: 8.5.1996 / 20:11:31 / cg"
   145     "Modified: 8.5.1996 / 20:11:31 / cg"
   135 ! !
   146 ! !
   136 
   147 
   406 ! !
   417 ! !
   407 
   418 
   408 !Polygon class methodsFor:'documentation'!
   419 !Polygon class methodsFor:'documentation'!
   409 
   420 
   410 version
   421 version
   411     ^ '$Header: /cvs/stx/stx/libbasic2/Polygon.st,v 1.25 2003-08-29 17:32:14 cg Exp $'
   422     ^ '$Header: /cvs/stx/stx/libbasic2/Polygon.st,v 1.26 2004-03-20 13:19:25 cg Exp $'
   412 ! !
   423 ! !