FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Change POPMENU background color?
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Change POPMENU background color?
Posted: Sat Apr 15, 2023 02:21 AM

Dear All,

How can I change background color (ClrPane) of POPMENU? I try COLORMENU COLORSELECT but it doesn't change.

Thanks in advance,

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Change POPMENU background color?
Posted: Sat Apr 15, 2023 06:18 PM
dutch wrote:Dear All,

How can I change background color (ClrPane) of POPMENU? I try COLORMENU COLORSELECT but it doesn't change.

Thanks in advance,
To be able to use those clauses, you have to define the 2013 style or simply use the COLORS clause

MENU oMnu COLORS .....
Code (fw): Select all Collapse
   MENU oPopup POPUP 2013 FONT oFontX NOBORDER ;
      COLORMENU CLR_VSBAR, CLR_BLUE ; //nClrTxtBrw ; //nClrBackBrw
      COLORSELECT nClrTxtBrw, nClrTxtBrw, nClrBackBrw ;
      LEFTCOLOR CLR_WHITE, CLR_HGRAY COLORSEPARATOR CLR_BLUE COLORBOX CLR_WHITE
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 1772
Joined: Thu Sep 05, 2019 05:32 AM
Re: Change POPMENU background color?
Posted: Sat Apr 15, 2023 06:35 PM
hi,

i use this
Code (fw): Select all Collapse
   IF BGcolor = Rgb( 0, 0, 1 )
      //  msginfo("oMenu black")
      MENU oMenu 2013 POPUP ;
              COLORMENU BGcolor, BFcolor ;
              COLORPNEL BFcolor, BGcolor ;
              COLORLEFT BFcolor, BGcolor ;
              COLORSELECT BFcolor, BGcolor, BFcolor

   ELSEIF BGColor = 256 * 256 * 256 - 1                               // 16777215
      //  msginfo("oMenu white")
      MENU oMenu 2013 POPUP ;
              COLORSELECT GetSysColor( COLOR_MENUHILIGHT ), GetSysColor( COLOR_MENUHILIGHT ), GetSysColor( COLOR_MENU )

   ELSE
      MENU oMenu 2013 POPUP ;
              COLORMENU BGcolor, BFcolor ;
              COLORPNEL BFcolor, BGcolor ;
              COLORLEFT BFcolor, BGcolor ;
              COLORSELECT BFcolor, BFcolor, BGcolor
   ENDIF

greeting,

Jimmy
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: Change POPMENU background color?
Posted: Sun Apr 16, 2023 03:15 AM

Dear All,

Thank you so much, it works well now.

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)

Continue the discussion