should toggle on BTNBMP work?
Best regards
Otto
- Code: Select all Expand view
- @ 10, 65;
BTNBMP oBtnVerrechnung ;
OF oDlg FLAT ;
SIZE 30, 30 ;
PIXEL ;
RESOURCE "CHECKON", "CHECKOFF" ;
FONT oFont ;
ACTION ( f_checkall(oBtnVerrechnung), oBtnVerrechnung:refresh() );
COLOR CLR_WHITE, 12088150
func f_checkall
...
if lToggle = .t.
lToggle = .F.
oBtnVerrechnung:bBmpNo := { || 2 }
else
lToggle = .T.
oBtnVerrechnung:bBmpNo := { || 1 }
endif