HorizontalScroller.st
author Jan Vrany <jan.vrany@labware.com>
Fri, 12 Aug 2022 22:38:28 +0100
branchjv
changeset 6857 58d68f671fa1
parent 3165 58b08c376a6e
permissions -rw-r--r--
cherry-picked GenericToolbarIconLibrary.st from 020158c929bb: * 4ecbe3a93aec: Merge, HG Automerge * 8e9dcb2a6533: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * 58d88b144b2b: Merge, HG Automerge * 33c75b4a9999: #REFACTORING by mawalch, mawalch * 74f6a697ee26: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 7b8ba07cb680: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 0122e4e6c587: #FEATURE by cg, Claus Gittinger <cg@exept.de> * e296fa4b5ccb: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 6db292aae07d: #OTHER by mawalch, mawalch * 4366b65a2c8a: Copyright updates, Jan Vrany <jan.vrany@fit.cvut.cz> * 6b79d8bfdcd9: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 6a0103018ab9: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 87fbb0b00ca6: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * 5c977f62957a: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 0ccfd6c3c75f: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 3926b9ae0a3c: #BUGFIX by cg, Claus Gittinger <cg@exept.de> * 8cebd063aeb5: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * 5445f50f8b2b: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * 272618940466: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 56bd6e2384a4: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * ffa93f79e6ae: #DOCUMENTATION by cg, Claus Gittinger <cg@exept.de> * 9410312a11cb: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 0036104e42ed: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 21fad03d5f11: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 8fd99a9d1d84: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * e4ed7fc09ca1: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 2c79a677e38a: #BUGFIX by cg, Claus Gittinger <cg@exept.de> * 81227f5c6bfa: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * a7d893a3c1e1: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 7928d87ff963: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 6ed15ff79b07: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * a1a9e33d6daf: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 07f0100f7064: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 23d027d53e04: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 823ff944a2a5: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 046733c3db59: #REFACTORING by exept, Claus Gittinger <cg@exept.de> * 040921add07a: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 5777bb6431cb: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 27448b51c873: #FEATURE by exept, Claus Gittinger <cg@exept.de> * 1309dd75d7f5: #FEATURE by exept, Claus Gittinger <cg@exept.de> * 6415731ee5e5: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * c7802dbb6d7d: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 23bf1e00dc95: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 645f74e46f86: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 236c24a6ce6c: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 8db4c188c57a: #REFACTORING by exept, Claus Gittinger <cg@exept.de> * 5d1367f2f32a: #BUGFIX by exept, Claus Gittinger <cg@exept.de> * e012b62927a6: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * cec8de8d957c: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 8e9b8e68a545: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 5274979b30fb: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 73e483e60e05: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * dc6e33c97410: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 041ace9885e8: #TUNING by cg, Claus Gittinger <cg@exept.de> * bdfd1b407c29: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 52afc5fcc948: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * f9c23ed981dc: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 2678c19d0794: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 043c6c163b4f: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 5e779e09b004: version method, Claus Gittinger <cg@exept.de> * 51394e1ee44c: #FEATURE by exept, Claus Gittinger <cg@exept.de> * c6a190f66fb7: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 34b9831cd1ee: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 3fa783b7f48d: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * b46f5a561997: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 3bedf44e10d1: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * d0ccad2a39b8: #FEATURE by exept, Claus Gittinger <cg@exept.de> * 20f0d7ec75e0: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 86c9b274be4e: #FEATURE by stefan, Stefan Vogel <sv@exept.de> * 4c58992375bb: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 4facc54a9585: #OTHER by exept, Claus Gittinger <cg@exept.de> * d9b1c96aa2b8: #REFACTORING by exept, Claus Gittinger <cg@exept.de> * de0b89624b00: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 8d5a93082103: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * c06c9bee59db: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de>
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
138
claus
parents: 130
diff changeset
     1
"
claus
parents: 130
diff changeset
     2
 COPYRIGHT (c) 1989 by Claus Gittinger
150
claus
parents: 138
diff changeset
     3
	      All Rights Reserved
138
claus
parents: 130
diff changeset
     4
claus
parents: 130
diff changeset
     5
 This software is furnished under a license and may be used
claus
parents: 130
diff changeset
     6
 only in accordance with the terms of that license and with the
claus
parents: 130
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
claus
parents: 130
diff changeset
     8
 be provided or otherwise made available to, or used by, any
claus
parents: 130
diff changeset
     9
 other person.  No title to or ownership of the software is
claus
parents: 130
diff changeset
    10
 hereby transferred.
claus
parents: 130
diff changeset
    11
"
claus
parents: 130
diff changeset
    12
3165
58b08c376a6e *** empty log message ***
Stefan Vogel <sv@exept.de>
parents: 1768
diff changeset
    13
"{ Package: 'stx:libwidg' }"
58b08c376a6e *** empty log message ***
Stefan Vogel <sv@exept.de>
parents: 1768
diff changeset
    14
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    15
Scroller subclass:#HorizontalScroller
538
b747ea31b972 use common code for H/V scrollers
Claus Gittinger <cg@exept.de>
parents: 205
diff changeset
    16
	instanceVariableNames:''
b747ea31b972 use common code for H/V scrollers
Claus Gittinger <cg@exept.de>
parents: 205
diff changeset
    17
	classVariableNames:''
b747ea31b972 use common code for H/V scrollers
Claus Gittinger <cg@exept.de>
parents: 205
diff changeset
    18
	poolDictionaries:''
b747ea31b972 use common code for H/V scrollers
Claus Gittinger <cg@exept.de>
parents: 205
diff changeset
    19
	category:'Views-Interactors'
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    20
!
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    21
138
claus
parents: 130
diff changeset
    22
!HorizontalScroller class methodsFor:'documentation'!
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    23
138
claus
parents: 130
diff changeset
    24
copyright
claus
parents: 130
diff changeset
    25
"
claus
parents: 130
diff changeset
    26
 COPYRIGHT (c) 1989 by Claus Gittinger
150
claus
parents: 138
diff changeset
    27
	      All Rights Reserved
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    28
138
claus
parents: 130
diff changeset
    29
 This software is furnished under a license and may be used
claus
parents: 130
diff changeset
    30
 only in accordance with the terms of that license and with the
claus
parents: 130
diff changeset
    31
 inclusion of the above copyright notice.   This software may not
claus
parents: 130
diff changeset
    32
 be provided or otherwise made available to, or used by, any
claus
parents: 130
diff changeset
    33
 other person.  No title to or ownership of the software is
claus
parents: 130
diff changeset
    34
 hereby transferred.
claus
parents: 130
diff changeset
    35
"
claus
parents: 130
diff changeset
    36
!
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    37
150
claus
parents: 138
diff changeset
    38
documentation
claus
parents: 138
diff changeset
    39
"
claus
parents: 138
diff changeset
    40
    Actually simply a scroller which preinitializes itself to have
claus
parents: 138
diff changeset
    41
    a horizontal orientation.
585
8f395aba0173 documentation
Claus Gittinger <cg@exept.de>
parents: 556
diff changeset
    42
8f395aba0173 documentation
Claus Gittinger <cg@exept.de>
parents: 556
diff changeset
    43
    [author:]
8f395aba0173 documentation
Claus Gittinger <cg@exept.de>
parents: 556
diff changeset
    44
        Claus Gittinger
150
claus
parents: 138
diff changeset
    45
"
205
6814c0bf8df8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 174
diff changeset
    46
! !
6814c0bf8df8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 174
diff changeset
    47
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    48
!HorizontalScroller methodsFor:'initialization'!
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    49
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    50
initialize
556
4c3edf42c03e checkin from browser
ca
parents: 538
diff changeset
    51
    orientation := #horizontal. 
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    52
    super initialize.
1768
32eb81e67be1 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 585
diff changeset
    53
32eb81e67be1 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 585
diff changeset
    54
    "Modified: / 7.3.1999 / 00:01:08 / cg"
0
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    55
! !
e6a541c1c0eb Initial revision
claus
parents:
diff changeset
    56
205
6814c0bf8df8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 174
diff changeset
    57
!HorizontalScroller class methodsFor:'documentation'!
6814c0bf8df8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 174
diff changeset
    58
6814c0bf8df8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 174
diff changeset
    59
version
3165
58b08c376a6e *** empty log message ***
Stefan Vogel <sv@exept.de>
parents: 1768
diff changeset
    60
    ^ '$Header: /cvs/stx/stx/libwidg/HorizontalScroller.st,v 1.17 2005-05-11 16:36:28 stefan Exp $'
205
6814c0bf8df8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 174
diff changeset
    61
! !