UIPainterView.st
author ca
Sat, 15 Feb 1997 19:14:01 +0100
changeset 49 7f58dd5fc836
parent 48 2fb81a3e0246
child 51 01d0c9394944
permissions -rw-r--r--
checkin from browser
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
48
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     1
UIPainterView::ViewProperty subclass:#GroupProperties
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     2
	instanceVariableNames:'controlledObjects group'
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     3
	classVariableNames:''
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     4
	poolDictionaries:''
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     5
	privateIn:UIPainterView
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     6
!
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     7
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     8
!UIPainterView::GroupProperties methodsFor:'accessing'!
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
     9
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    10
controlledObjects
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    11
    "return the value of the instance variable 'controlledObjects' (automatically generated)"
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    12
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    13
    ^ controlledObjects!
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    14
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    15
controlledObjects:something
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    16
    "set the value of the instance variable 'controlledObjects' (automatically generated)"
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    17
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    18
    controlledObjects := something.!
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    19
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    20
group
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    21
    "return the value of the instance variable 'group' (automatically generated)"
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    22
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    23
    ^ group!
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    24
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    25
group:something
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    26
    "set the value of the instance variable 'group' (automatically generated)"
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    27
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    28
    group := something.! !
2fb81a3e0246 *** empty log message ***
ca
parents: 45
diff changeset
    29