1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
" Range example "
|str substr range|
str := 'I like apples and plums.'.
Transcript showLine: ('String is : \'', str, '\'').
substr := str substringWithRange: (7 <> 5).
Transcript showLine: ('Substring at location 7 with length 5 is \'',
substr, '\'').
range := str rangeOfString: 'tomato'.
((range location) = NSNotFound)
ifTrue:
[ Transcript showLine: 'Tomato not found' .].
range := str rangeOfString: 'plum'.
Transcript showLine: ('Location of \'plum\' is ', ((range location) stringValue),
' and length is ', ((range length) stringValue)).
range := ( (range location) <> 5).
Transcript showLine: ('Substring with modified range \'',
(str substringWithRange:range), '\'').
|
