FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour a btnbmp question (show popup)
Posts: 7318
Joined: Thu Oct 18, 2012 07:17 PM
a btnbmp question (show popup)
Posted: Tue Jan 22, 2019 03:50 PM


For not show the black arrow On Btnbmp class I add on the method PaintPopupSection the bold string

if ::oPopup != nil .and. GetClassName( GetParent( Self:hWnd ) ) = "TBAR"

Now the final user can open the popupmenu but must click at the end of btnbmp, soon the final user not found the exact point with the mouse

on the source I made

aBtn[ nelemento]:oPopUp := { |oBtn|BtnPopMenu( oBtn,aBtn,nElemento ) }

How I can make to move the point of the click on the center of btnbmp ?

or please, you have another solution ?


I tried also in this mode But it make error (I saw a post of Nages)

aBtn[nElemento ]:bAction := { |oBtn| aBtn[nElemento ]:oPopup := { |oBtn| BtnPopMenu( oBtn ) }, ;
aBtn[nElemento ]:ShowPopUp(), ;
aBtn[nElemento]:oPopup := nil }
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

Continue the discussion