14 instanceVariableNames:'fontPanel code viewProperties superclassName className methodName |
14 instanceVariableNames:'fontPanel code viewProperties superclassName className methodName |
15 categoryName' |
15 categoryName' |
16 classVariableNames:'HandCursor' |
16 classVariableNames:'HandCursor' |
17 poolDictionaries:'' |
17 poolDictionaries:'' |
18 category:'Interface-UIPainter' |
18 category:'Interface-UIPainter' |
|
19 ! |
|
20 |
|
21 Object subclass:#ViewProperty |
|
22 instanceVariableNames:'aspectSelector changeSelector name nameIndex view elementClass |
|
23 labelSelector identifier' |
|
24 classVariableNames:'Identifier' |
|
25 poolDictionaries:'' |
|
26 privateIn:UIPainterView |
|
27 ! |
|
28 |
|
29 UIPainterView::ViewProperty subclass:#GroupProperties |
|
30 instanceVariableNames:'controlledObjects group' |
|
31 classVariableNames:'' |
|
32 poolDictionaries:'' |
|
33 privateIn:UIPainterView |
19 ! |
34 ! |
20 |
35 |
21 !UIPainterView class methodsFor:'documentation'! |
36 !UIPainterView class methodsFor:'documentation'! |
22 |
37 |
23 copyright |
38 copyright |
1251 ^ true |
1266 ^ true |
1252 |
1267 |
1253 |
1268 |
1254 ! ! |
1269 ! ! |
1255 |
1270 |
|
1271 !UIPainterView::ViewProperty class methodsFor:'instance creation'! |
|
1272 |
|
1273 new |
|
1274 Identifier notNil ifTrue:[Identifier := Identifier + 1] |
|
1275 ifFalse:[Identifier := 1]. |
|
1276 |
|
1277 ^ self basicNew initialize |
|
1278 ! ! |
|
1279 |
|
1280 !UIPainterView::ViewProperty methodsFor:'accessing'! |
|
1281 |
|
1282 aspectSelector |
|
1283 "return the value of the instance variable 'aspectSelector' (automatically generated)" |
|
1284 |
|
1285 ^ aspectSelector |
|
1286 ! |
|
1287 |
|
1288 aspectSelector:something |
|
1289 "set the value of the instance variable 'aspectSelector' (automatically generated)" |
|
1290 |
|
1291 aspectSelector := something. |
|
1292 ! |
|
1293 |
|
1294 changeSelector |
|
1295 "return the value of the instance variable 'changeSelector' (automatically generated)" |
|
1296 |
|
1297 ^ changeSelector! |
|
1298 |
|
1299 changeSelector:something |
|
1300 "set the value of the instance variable 'changeSelector' (automatically generated)" |
|
1301 |
|
1302 changeSelector := something.! |
|
1303 |
|
1304 elementClass |
|
1305 "return the value of the instance variable 'elementClass' (automatically generated)" |
|
1306 |
|
1307 ^ elementClass! |
|
1308 |
|
1309 elementClass:something |
|
1310 "set the value of the instance variable 'elementClass' (automatically generated)" |
|
1311 |
|
1312 elementClass := something.! |
|
1313 |
|
1314 group |
|
1315 ^ nil |
|
1316 ! |
|
1317 |
|
1318 identifier |
|
1319 "return the unique identifier assigned to property |
|
1320 " |
|
1321 ^ identifier |
|
1322 ! |
|
1323 |
|
1324 labelSelector |
|
1325 "return the value of the instance variable 'labelSelector' (automatically generated)" |
|
1326 |
|
1327 ^ labelSelector! |
|
1328 |
|
1329 labelSelector:something |
|
1330 "set the value of the instance variable 'labelSelector' (automatically generated)" |
|
1331 |
|
1332 labelSelector := something.! |
|
1333 |
|
1334 name |
|
1335 "return the value of the instance variable 'name' (automatically generated)" |
|
1336 |
|
1337 ^ name! |
|
1338 |
|
1339 name:something |
|
1340 "set the value of the instance variable 'name' (automatically generated)" |
|
1341 |
|
1342 name := something.! |
|
1343 |
|
1344 nameIndex |
|
1345 "return the value of the instance variable 'nameIndex' (automatically generated)" |
|
1346 |
|
1347 ^ nameIndex! |
|
1348 |
|
1349 nameIndex:something |
|
1350 "set the value of the instance variable 'nameIndex' (automatically generated)" |
|
1351 |
|
1352 nameIndex := something.! |
|
1353 |
|
1354 view |
|
1355 "return the value of the instance variable 'view' (automatically generated)" |
|
1356 |
|
1357 ^ view! |
|
1358 |
|
1359 view:something |
|
1360 "set the value of the instance variable 'view' (automatically generated)" |
|
1361 |
|
1362 view := something.! ! |
|
1363 |
|
1364 !UIPainterView::ViewProperty methodsFor:'initialization'! |
|
1365 |
|
1366 initialize |
|
1367 super initialize. |
|
1368 identifier := Identifier |
|
1369 ! ! |
|
1370 |
|
1371 !UIPainterView::GroupProperties methodsFor:'accessing'! |
|
1372 |
|
1373 controlledObjects |
|
1374 "return the value of the instance variable 'controlledObjects' (automatically generated)" |
|
1375 |
|
1376 ^ controlledObjects! |
|
1377 |
|
1378 controlledObjects:something |
|
1379 "set the value of the instance variable 'controlledObjects' (automatically generated)" |
|
1380 |
|
1381 controlledObjects := something.! |
|
1382 |
|
1383 group |
|
1384 "return the value of the instance variable 'group' (automatically generated)" |
|
1385 |
|
1386 ^ group! |
|
1387 |
|
1388 group:something |
|
1389 "set the value of the instance variable 'group' (automatically generated)" |
|
1390 |
|
1391 group := something.! ! |
|
1392 |
1256 !UIPainterView class methodsFor:'documentation'! |
1393 !UIPainterView class methodsFor:'documentation'! |
1257 |
1394 |
1258 version |
1395 version |
1259 ^ '$Header$' |
1396 ^ '$Header$' |
1260 ! ! |
1397 ! ! |