Page 1 of 1
CJPushButton CARGO CANCEL
Posted: Fri Sep 09, 2011 5:18 am
by skiman
Hi,
With the DCPushButtons there is a CARGO 'CANCEL' which is really usefull to use with standard CANCEL-buttons.
This isn't working with CJPushButtons.
Re: CJPushButton CARGO CANCEL
Posted: Sun Sep 11, 2011 6:48 pm
by rdonnay
In _DCGETBX.PRG make the following code change:
Code: Select all
lCancelled := nEvent == xbeP_SetInputFocus .AND. Valtype(oNextXbp) = 'O' .AND. ;
(oNextXbp:isDerivedFrom('DC_XbpPushButton') .OR. ;
oNextXbp:isDerivedFrom('DC_XbpRadioButton') .OR. ;
oNextXbp:isDerivedFrom('DC_XbpPushButtonXP') .OR. ;
oNextXbp:isDerivedFrom('DC_XbpCheckBox') .OR. ;
oNextXbp:isDerivedFrom('CJ_PushButton') .OR. ; <<<<<<<<<<<<<<<<<<<<<<<<<<< new
oNextXbp:isDerivedFrom('XbpMenu')) .AND. ;
((Valtype(oNextXbp:cargo) = 'C' .AND. oNextXbp:cargo == 'CANCEL') .OR. ;
(Valtype(DC_GetCargo(oNextXbp)) = 'C' .AND. Upper(DC_GetCargo(oNextXbp)) == 'CANCEL'))