1 "

     3 "

     2  COPYRIGHT (c) 1994 by Claus Gittinger

     4  COPYRIGHT (c) 1994 by Claus Gittinger

     3 	      All Rights Reserved

     5 	      All Rights Reserved

     4 

     6 

     5  This software is furnished under a license and may be used

     7  This software is furnished under a license and may be used

   488         self drawHandleAtX:x type:(tabSpec typeOfTab:idx).

   490         self drawHandleAtX:x type:(tabSpec typeOfTab:idx).

   489     ].

   491     ].

   490 

   492 

   491     titles notNil ifTrue:[

   493     titles notNil ifTrue:[

   492         s := titles at:idx.

   494         s := titles at:idx.

   494         s displayOn:self x:x+3 y:(gc font ascent).

   496         s displayOn:self x:x+3 y:(gc font ascent).

   495     ].

   497     ].

   496 

   498 

   497     "Created: 28.3.1997 / 13:57:54 / cg"

   499     "Created: 28.3.1997 / 13:57:54 / cg"

   498     "Modified: 1.4.1997 / 15:29:19 / cg"

   500     "Modified: 1.4.1997 / 15:29:19 / cg"

   511     ] ifFalse:[

   513     ] ifFalse:[

   512         x := self positionOfTabAtIndex:idx.

   514         x := self positionOfTabAtIndex:idx.

   513     ].

   515     ].

   514 

   516 

   515     s := titles at:idx.

   517     s := titles at:idx.

   517     s displayOn:self x:x+3 y:(gc font ascent).

   519     s displayOn:self x:x+3 y:(gc font ascent).

   518 

   520 

   519     "Modified: 1.4.1997 / 15:20:31 / cg"

   521     "Modified: 1.4.1997 / 15:20:31 / cg"

   520 ! !

   522 ! !

   521 

   523