equal
deleted
inserted
replaced
52 ! ! |
52 ! ! |
53 |
53 |
54 !UIPropertyView methodsFor:'accessing'! |
54 !UIPropertyView methodsFor:'accessing'! |
55 |
55 |
56 buildFromSpec:aSpec |
56 buildFromSpec:aSpec |
57 |state subViews backGroundColor| |
57 |state subViews backGroundColor v| |
58 |
58 |
59 aSpec ~= specClass ifTrue:[ |
59 aSpec ~= specClass ifTrue:[ |
60 window destroySubViews. |
60 window destroySubViews. |
61 |
61 |
62 aSpec notNil ifTrue:[ |
62 aSpec notNil ifTrue:[ |
63 builder buildFromSpec:aSpec in:window. |
63 v := builder buildFromSpec:aSpec in:window. |
64 window allViewBackground:(self viewBackground). |
64 window allViewBackground:(self viewBackground). |
65 window realizeAllSubViews |
65 window realizeAllSubViews. |
66 ] |
66 ] |
67 ]. |
67 ]. |
68 specClass := aSpec. |
68 specClass := aSpec. |
69 self modified:false |
69 self modified:false |
70 |
70 |
994 |
994 |
995 forView:aView |
995 forView:aView |
996 "set the view the layout derives from |
996 "set the view the layout derives from |
997 " |
997 " |
998 forView := aView. |
998 forView := aView. |
999 self selection:(UIPainterView layoutType:forView). |
999 self update. |
1000 ! |
1000 ! |
1001 |
1001 |
1002 layout |
1002 layout |
1003 "returns current layout |
1003 "returns current layout |
1004 " |
1004 " |
1012 |
1012 |
1013 layoutType |
1013 layoutType |
1014 "returns current layoutType |
1014 "returns current layoutType |
1015 " |
1015 " |
1016 ^ selection |
1016 ^ selection |
|
1017 ! |
|
1018 |
|
1019 update |
|
1020 "update from physical view |
|
1021 " |
|
1022 |superView| |
|
1023 |
|
1024 forView notNil ifTrue:[ |
|
1025 superView := forView superView |
|
1026 ]. |
|
1027 noteBook enabled:((superView isNil or:[superView specClass isLayoutContainer]) not). |
|
1028 self selection:(UIPainterView layoutType:forView). |
|
1029 |
|
1030 |
1017 ! ! |
1031 ! ! |
1018 |
1032 |
1019 !UIPropertyView::Dimension methodsFor:'accessing hierarchy'! |
1033 !UIPropertyView::Dimension methodsFor:'accessing hierarchy'! |
1020 |
1034 |
1021 window |
1035 window |
1438 self modified:false. |
1452 self modified:false. |
1439 ] |
1453 ] |
1440 ]. |
1454 ]. |
1441 idx := layoutTypes findFirst:[:type| type == aLayoutType ]. |
1455 idx := layoutTypes findFirst:[:type| type == aLayoutType ]. |
1442 noteBook setSelection:idx. |
1456 noteBook setSelection:idx. |
1443 noteBook enabled:(forView notNil). |
|
1444 |
1457 |
1445 ! ! |
1458 ! ! |
1446 |
1459 |
1447 !UIPropertyView::Specification methodsFor:'accessing'! |
1460 !UIPropertyView::Specification methodsFor:'accessing'! |
1448 |
1461 |