Layout.st
author claus
Tue, 29 Aug 1995 18:19:30 +0200
changeset 94 8888ddd11323
parent 93 f2389560b8eb
child 96 948318b2fbd4
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
88
claus
parents: 83
diff changeset
     1
"
claus
parents: 83
diff changeset
     2
 COPYRIGHT (c) 1995 by Claus Gittinger
93
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
     3
	      All Rights Reserved
88
claus
parents: 83
diff changeset
     4
claus
parents: 83
diff changeset
     5
 This software is furnished under a license and may be used
claus
parents: 83
diff changeset
     6
 only in accordance with the terms of that license and with the
claus
parents: 83
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
claus
parents: 83
diff changeset
     8
 be provided or otherwise made available to, or used by, any
claus
parents: 83
diff changeset
     9
 other person.  No title to or ownership of the software is
claus
parents: 83
diff changeset
    10
 hereby transferred.
claus
parents: 83
diff changeset
    11
"
claus
parents: 83
diff changeset
    12
77
claus
parents:
diff changeset
    13
Object subclass:#Layout
claus
parents:
diff changeset
    14
	 instanceVariableNames:''
claus
parents:
diff changeset
    15
	 classVariableNames:''
claus
parents:
diff changeset
    16
	 poolDictionaries:''
83
claus
parents: 77
diff changeset
    17
	 category:'Graphics-Geometry'
77
claus
parents:
diff changeset
    18
!
claus
parents:
diff changeset
    19
88
claus
parents: 83
diff changeset
    20
!Layout class methodsFor:'documentation'!
claus
parents: 83
diff changeset
    21
claus
parents: 83
diff changeset
    22
copyright
claus
parents: 83
diff changeset
    23
"
claus
parents: 83
diff changeset
    24
 COPYRIGHT (c) 1995 by Claus Gittinger
93
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    25
	      All Rights Reserved
88
claus
parents: 83
diff changeset
    26
claus
parents: 83
diff changeset
    27
 This software is furnished under a license and may be used
claus
parents: 83
diff changeset
    28
 only in accordance with the terms of that license and with the
claus
parents: 83
diff changeset
    29
 inclusion of the above copyright notice.   This software may not
claus
parents: 83
diff changeset
    30
 be provided or otherwise made available to, or used by, any
claus
parents: 83
diff changeset
    31
 other person.  No title to or ownership of the software is
claus
parents: 83
diff changeset
    32
 hereby transferred.
claus
parents: 83
diff changeset
    33
"
claus
parents: 83
diff changeset
    34
!
claus
parents: 83
diff changeset
    35
93
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    36
documentation
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    37
"
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    38
    This is an abstract superclass for geometry controlling objects.
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    39
    While old smalltalks used relative origin/extent/corner and absolute
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    40
    origin/corner/extents, these mechanisms are now being removed from the
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    41
    view itself into geometry controlling objects, which are given a superviews
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    42
    size and are to return a components size upon request.
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    43
    This allows more flexible geometry management, since any algorithm can
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    44
    be implemented (if the existing ones are not sufficient, add you own subclass
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    45
    and instal it as layout-object in your view).
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    46
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    47
    See more info & examples in concrete subclasses:
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    48
	LayoutOrigin LayoutFrame AlignmentOrigin
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    49
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    50
    Notice: this class was implemented using protocol information
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    51
    from alpha testers - it may not be complete or compatible to
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    52
    the corresponding ST-80 class. If you encounter any incompatibilities,
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    53
    please forward a note to the ST/X team.
94
8888ddd11323 *** empty log message ***
claus
parents: 93
diff changeset
    54
"
93
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    55
!
f2389560b8eb *** empty log message ***
claus
parents: 88
diff changeset
    56
88
claus
parents: 83
diff changeset
    57
version
claus
parents: 83
diff changeset
    58
"
94
8888ddd11323 *** empty log message ***
claus
parents: 93
diff changeset
    59
$Header: /cvs/stx/stx/libview2/Layout.st,v 1.5 1995-08-29 16:19:23 claus Exp $
88
claus
parents: 83
diff changeset
    60
"
claus
parents: 83
diff changeset
    61
! !
claus
parents: 83
diff changeset
    62
77
claus
parents:
diff changeset
    63
!Layout class methodsFor:'instance creation'!
claus
parents:
diff changeset
    64
claus
parents:
diff changeset
    65
new
claus
parents:
diff changeset
    66
    ^ self basicNew initialize
claus
parents:
diff changeset
    67
! !
claus
parents:
diff changeset
    68
claus
parents:
diff changeset
    69
!Layout methodsFor:'queries'!
claus
parents:
diff changeset
    70
claus
parents:
diff changeset
    71
rectangleRelativeTo:superRectangle preferred:prefRect
claus
parents:
diff changeset
    72
    ^ self subclassResponsibility
claus
parents:
diff changeset
    73
!
claus
parents:
diff changeset
    74
claus
parents:
diff changeset
    75
isLayout
claus
parents:
diff changeset
    76
    ^ true
claus
parents:
diff changeset
    77
! !
claus
parents:
diff changeset
    78
claus
parents:
diff changeset
    79
!Layout methodsFor:'initialization'!
claus
parents:
diff changeset
    80
claus
parents:
diff changeset
    81
initialize
claus
parents:
diff changeset
    82
    ^ self subclassResponsibility
claus
parents:
diff changeset
    83
! !