Hi Naomi,

The button differences are mostly display attributes. The click sends each button to a different object to process that button. I know that I could reload the buttons by looping through them a resetting their attributes. I already have an array that positions them initially. When I create the button it has an attribute that stores the primary key of the record it represents.

What I am worried about with creating and then hiding some of the buttons is that if I have to hide the small buttons they will be underneath the big buttons and I have seen VFP do some weird things with controls that sit on top of each other even is one is active. Or I will have to make the inactive buttons tiny and hide them somewhere on the edge of the screen. If there is a row with 5 big lot buttons then 5 other buttons from that row will have to vanish.

Thanks,
Margaret

**************************************************
*-- Class:        cmdemployee (c:\owl\libs\owlclass.vcx)
*-- ParentClass:  cmdaction (c:\owl\libs\owlclass.vcx)
*-- BaseClass:    commandbutton
*-- Time Stamp:   07/31/07 11:44:00 AM
*
DEFINE CLASS cmdemployee AS cmdaction


	Height = 62
	Width = 70
	FontName = "Bitstream Vera Sans Mono"
	Caption = "Employee"
	BackColor = RGB(0,128,192)
	caction = "employee"
	Name = "cmdemployee"


	PROCEDURE onclick
		*** Go Directly to the Form
		IF PEMSTATUS( THISFORM.obz, 'DoEmp', 5 )
			* If the form's business object has a DoAction method
			* then execute it.
		    THISFORM.obz.DoEmp( THIS.cAction , this.nprimarykey)
		ELSE
		    *** Error here!
		    MESSAGEBOX( "Sorry, the specified method (" + THIS.cAction + ") cannot be found", 16, "" )
		ENDIF
	ENDPROC


ENDDEFINE


**************************************************
*-- Class:        cmdlot (c:\owl\libs\owlclass.vcx)
*-- ParentClass:  cmdaction (c:\owl\libs\owlclass.vcx)
*-- BaseClass:    commandbutton
*-- Time Stamp:   07/31/07 11:44:05 AM
*
DEFINE CLASS cmdlot AS cmdaction


	Height = 62
	Width = 156
	FontName = "Bitstream Vera Sans Mono"
	Caption = "Lot"
	ForeColor = RGB(255,255,255)
	BackColor = RGB(0,128,0)
	Alignment = 4
	caction = "lot"
	Name = "cmdlot"


	PROCEDURE onclick
		*** Go Directly to the Form
		IF PEMSTATUS( THISFORM.obz, 'DoLot', 5 )
			* If the form's business object has a DoAction method
			* then execute it.
		    THISFORM.obz.DoLot( THIS.cAction , this.nprimarykey)
		ELSE
		    *** Error here!
		    MESSAGEBOX( "Sorry, the specified method (" + THIS.cAction + ") cannot be found", 16, "" )
		ENDIF
	ENDPROC


ENDDEFINE
*
*-- EndDefine: cmdlot
**************************************************