Mr Antonio
As I am eager to deliver a revision with the new buttonbars with 2007 look by tomorrow morning, I made a very crude patch to the paint method in TBtnBmp class.
I have commented the return statement at line 734 :-
- Code: Select all Expand view RUN
697: if Upper( ::oWnd:ClassName() ) == "TBAR" .and. ::oWnd:l2007
<< statements >>
734: // return nil
735: endif
I have enclosed the code hadling if ::lTransparent from lines 737 to 765 in an if clause " if !::oWnd:l2007 <exisiting code> ; endif
Now the block "if ::oPopup != nil; <code> ; endif from lines 767 to 789 work even in the case of ::l2007. After this, I introduced " if ::ownd:l2007; return nil; endif
This is a very crude patch. May have unknown side affects. But seems to work for me for the immedate purpose.
I shall await your complete patch to make the dropdownmenu button painted as earlier.