Change POPMENU background color?

Change POPMENU background color?

Postby dutch » Sat Apr 15, 2023 2: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 19.01 / 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)
User avatar
dutch
 
Posts: 1542
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand


Re: Change POPMENU background color?

Postby cnavarro » Sat Apr 15, 2023 6: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: Select all  Expand view  RUN

   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
User avatar
cnavarro
 
Posts: 6549
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Change POPMENU background color?

Postby Jimmy » Sat Apr 15, 2023 6:35 pm

hi,

i use this
Code: Select all  Expand view  RUN
  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

Image
Image
greeting,
Jimmy
User avatar
Jimmy
 
Posts: 1732
Joined: Thu Sep 05, 2019 5:32 am
Location: Hamburg, Germany

Re: Change POPMENU background color?

Postby dutch » Sun Apr 16, 2023 3:15 am

Dear All,

Thank you so much, it works well now.
Regards,
Dutch

FWH 19.01 / 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)
User avatar
dutch
 
Posts: 1542
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 109 guests