24 Nov
2005
24 Nov
'05
5:49 p.m.
Thanks, works for me.
Ian.
On 24 Nov 2005, at 16:43, Damien Cassou wrote:
Hi,
here is a simple code to add a 'remove' button on
MAOneToManycomponent.
Bye
'From Squeak3.8 of ''5 May 2005'' [latest update: #6665] on 24
November 2005 at 4:41:36 pm'!
!MAOneToManyComponent methodsFor: 'private' stamp: 'dc 11/24/2005
16:10'!
buildReport
^ (MAReport rows: self value description: self reference)
addColumn: (MACommandColumn new
addCommandOn: self selector: #remove: text: 'Remove';
yourself);
yourself! !
'From Squeak3.8 of ''5 May 2005'' [latest update: #6665] on 24
November 2005 at 4:42:43 pm'!
!MAOneToManyComponent methodsFor: 'actions' stamp: 'dc 11/24/2005
16:34'!
remove: anElement
self report rows
remove: anElement! !