8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 "{ Package: 'stx:libbasic' }" |
12 "{ Package: 'stx:libbasic' }" |
|
13 |
|
14 "{ NameSpace: Smalltalk }" |
13 |
15 |
14 Object subclass:#Geometric |
16 Object subclass:#Geometric |
15 instanceVariableNames:'' |
17 instanceVariableNames:'' |
16 classVariableNames:'Scale InverseScale' |
18 classVariableNames:'Scale InverseScale' |
17 poolDictionaries:'' |
19 poolDictionaries:'' |
456 |
458 |
457 "Created: 12.2.1997 / 11:41:58 / cg" |
459 "Created: 12.2.1997 / 11:41:58 / cg" |
458 ! |
460 ! |
459 |
461 |
460 outlineIntersects:aRectangle |
462 outlineIntersects:aRectangle |
461 "return true, if the receivers image intersects |
463 "return true, if the receiver's image intersects |
462 aRectangle, when drawn as an outline. |
464 aRectangle, when drawn as an outline. |
463 Here, all we can do is to ask the boundary rectangle; |
465 Here, all we can do is to ask the boundary rectangle; |
464 subclasses should reimplement better checks." |
466 subclasses should reimplement better checks." |
465 |
467 |
466 ^ self bounds intersects:aRectangle |
468 ^ self bounds intersects:aRectangle |
467 |
469 |
468 "Modified: 10.2.1997 / 13:40:36 / cg" |
470 "Modified: 10.2.1997 / 13:40:36 / cg" |
469 ! |
471 ! |
470 |
472 |
471 regionIntersects:aRectangle |
473 regionIntersects:aRectangle |
472 "return true, if the receivers image intersects |
474 "return true, if the receiver's image intersects |
473 aRectangle, when drawn as a filled version. |
475 aRectangle, when drawn as a filled version. |
474 Here, all we can do is to ask the boundary rectangle; |
476 Here, all we can do is to ask the boundary rectangle; |
475 subclasses should reimplement better checks." |
477 subclasses should reimplement better checks." |
476 |
478 |
477 ^ self bounds intersects:aRectangle |
479 ^ self bounds intersects:aRectangle |