equal
deleted
inserted
replaced
414 |
414 |
415 "Modified: / 28-06-1997 / 20:09:35 / cg" |
415 "Modified: / 28-06-1997 / 20:09:35 / cg" |
416 "Created: / 03-08-1997 / 18:16:40 / cg" |
416 "Created: / 03-08-1997 / 18:16:40 / cg" |
417 "Modified: / 16-01-2018 / 18:59:04 / stefan" |
417 "Modified: / 16-01-2018 / 18:59:04 / stefan" |
418 ! ! |
418 ! ! |
|
419 |
419 |
420 |
420 !CharacterArray class methodsFor:'cleanup'! |
421 !CharacterArray class methodsFor:'cleanup'! |
421 |
422 |
422 lowSpaceCleanup |
423 lowSpaceCleanup |
423 "cleanup in low-memory situations" |
424 "cleanup in low-memory situations" |
5201 |
5202 |
5202 "/ the blue may become a user-setting some time later.. |
5203 "/ the blue may become a user-setting some time later.. |
5203 ^ (self actionForAll:aBlock) withColor:(Color blue) |
5204 ^ (self actionForAll:aBlock) withColor:(Color blue) |
5204 ! |
5205 ! |
5205 |
5206 |
|
5207 asActionLinkTo:aBlock info:tooltipMessage |
|
5208 "change the action block of all characters and colorize as a link. |
|
5209 Some widgets use this like a href if clicked onto the text |
|
5210 (for example, the system-browser's info at the bottom is such a widget). |
|
5211 Caveat: currently the tooltipMessage is ignored (there is no mechanism for that, yet)" |
|
5212 |
|
5213 "/ the blue may become a user-setting some time later.. |
|
5214 ^ (self actionForAll:aBlock) withColor:(Color blue) |
|
5215 ! |
|
5216 |
5206 colorizeAllWith:aColor |
5217 colorizeAllWith:aColor |
5207 "return a text object representing the receiver, but all colorized" |
5218 "return a text object representing the receiver, but all colorized" |
5208 |
5219 |
5209 "this test allows for small non-gui apps to be built without libbasic2 (where Text is)" |
5220 "this test allows for small non-gui apps to be built without libbasic2 (where Text is)" |
5210 Text isNil ifTrue:[^ self]. |
5221 Text isNil ifTrue:[^ self]. |
5658 clearContents |
5669 clearContents |
5659 "to be used with cryptographic keys, to wipe their contents after use" |
5670 "to be used with cryptographic keys, to wipe their contents after use" |
5660 |
5671 |
5661 self atAllPut:(Character value:0) |
5672 self atAllPut:(Character value:0) |
5662 ! ! |
5673 ! ! |
|
5674 |
|
5675 |
5663 |
5676 |
5664 |
5677 |
5665 !CharacterArray methodsFor:'matching - glob expressions'! |
5678 !CharacterArray methodsFor:'matching - glob expressions'! |
5666 |
5679 |
5667 compoundMatch:aString |
5680 compoundMatch:aString |
10362 "dispatch for visitor pattern; send #visitString:with: to aVisitor" |
10375 "dispatch for visitor pattern; send #visitString:with: to aVisitor" |
10363 |
10376 |
10364 ^ aVisitor visitString:self with:aParameter |
10377 ^ aVisitor visitString:self with:aParameter |
10365 ! ! |
10378 ! ! |
10366 |
10379 |
|
10380 |
10367 !CharacterArray class methodsFor:'documentation'! |
10381 !CharacterArray class methodsFor:'documentation'! |
10368 |
10382 |
10369 version |
10383 version |
10370 ^ '$Header$' |
10384 ^ '$Header$' |
10371 ! |
10385 ! |