Armando
Te importaría enviarmelo a mi tambien a patricio_avalos_aguirre@hotmail.com
tengo 25 mb
Saludos
Patricio
#define TB_ISBUTTONHIDDEN 1036
METHOD IsButtonHidden( nButton ) INLINE (SendMessage( ::hWnd, TB_ISBUTTONHIDDEN, nButton, 0 ) <> 0 )
#define TB_DELETEBUTTON 1046
METHOD DelButton( nButton ) CLASS TToolBar
SendMessage( ::hWnd, TB_DELETEBUTTON, nButton - 1, 0 )
return nil