TreeItem subclass:#TreeItemWithImage
	instanceVariableNames:'image'
	classVariableNames:''
	poolDictionaries:''
	category:'Interface-Support'
!

!TreeItemWithImage class methodsFor:'documentation'!

documentation
"
    Like a regular TreeItem, but provides its own icon image.


    [author:]
        Claus Gittinger (cg@exept)

    [see also:]
        TreeItem FileTreeItem
        SelectionInTree SelectionInTreeView

    [instance variables:]
        image           <ImageOrForm>           my icon image

    [class variables:]
"
! !

!TreeItemWithImage methodsFor:'accessing'!

image
    "return the value of the instance variable 'image' (automatically generated)"

    ^ image!

image:something
    "set the value of the instance variable 'image' (automatically generated)"

    image := something.! !

!TreeItemWithImage class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/libwidg2/TreeItemWithImage.st,v 1.1 1999-02-11 17:49:07 cg Exp $'
! !