Mercurial > hg > xemacs-beta
view pkg-src/tree-nx/TreeButtonCell.m @ 163:0132846995bd r20-3b8
Import from CVS: tag r20-3b8
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:43:35 +0200 |
parents | |
children |
line wrap: on
line source
#import "TreeButtonCell.h" #import "TreeButton.h" @implementation TreeButtonCell - parent { return parent; } - setParent:anObject { // anObject should be the parent Control object subclass parent = anObject; return self; } - (BOOL)trackMouse:(NXEvent *)theEvent inRect:(const NXRect *)cellFrame ofView:aView { // this traps the button being selected. BOOL result = [super trackMouse:theEvent inRect:cellFrame ofView:aView]; if (result && [parent respondsTo:@selector(wasSelected:)]) { [parent wasSelected:self]; } return result; } - performClick:sender { [super performClick:sender]; if ([parent respondsTo:@selector(wasSelected:)]) { [parent wasSelected:self]; } return self; } @end