Page 1 of 4
TMenuItem height [Fixed]
Posted: Fri May 05, 2017 9:43 pm
by Enrico Maria Giordano
TMenuItem height keeps changing at any FWH release...
EMG
Re: TMenuItem height
Posted: Fri May 05, 2017 10:52 pm
by cnavarro
It is possible that I modified something in the last version
Can you put a picture?
Thank you
Re: TMenuItem height
Posted: Sat May 06, 2017 9:02 am
by Enrico Maria Giordano
Cristobal,
just build a popup menu and compare it with the previous FWH release.
EMG
Re: TMenuItem height
Posted: Sat May 06, 2017 11:43 am
by cnavarro
Enrico
Sorry, my eyesight is not very good
Is it higher now?
Re: TMenuItem height
Posted: Sat May 06, 2017 12:28 pm
by Enrico Maria Giordano
No, it's smaller.
EMG
Re: TMenuItem height
Posted: Sat May 06, 2017 1:59 pm
by Enrico Maria Giordano
Cristobal,
do you have a quick and dirty workaround to share?
EMG
Re: TMenuItem height
Posted: Sat May 06, 2017 5:09 pm
by cnavarro
One moment, please
I'm checking the code to see what difference there is
Re: TMenuItem height
Posted: Sat May 06, 2017 5:10 pm
by Enrico Maria Giordano
Muchas gracias!
EMG
Re: TMenuItem height
Posted: Sat May 06, 2017 5:11 pm
by cnavarro
To you
Enrico
Only into MENUS POPUPS ?
Re: TMenuItem height
Posted: Sat May 06, 2017 5:15 pm
by Enrico Maria Giordano
No, normal window menu also.
EMG
Re: TMenuItem height
Posted: Sat May 06, 2017 5:17 pm
by cnavarro
Ok, thanks
Re: TMenuItem height
Posted: Sat May 06, 2017 8:15 pm
by cnavarro
Enrico, at line 955 into PDMENU.PRG
Code: Select all
ChgMenuMea( pMitStruct, Round( nWText * nFw, 0 ), ;
if( oItem:lSeparator, Int( nHItem * GetnHeightItem() ),;
Max( Int( nHItem * GetnHeightItem() * if( !lHFont, 1.5, 1 ) ), GetSysMetrics( 15 ) ) ) )
With
Code: Select all
ChgMenuMea( pMitStruct, Round( nWText * nFw, 0 ), ;
if( oItem:lSeparator, Int( nHItem * GetnHeightItem() ),;
Max( Round( nHItem * GetnHeightItem() * if( !lHFont, 1.5, 1 ), 0 ), GetSysMetrics( 15 ) ) ) )
and try
Re: TMenuItem height
Posted: Sat May 06, 2017 8:28 pm
by Enrico Maria Giordano
Sorry, no change.
EMG
Re: TMenuItem height
Posted: Sat May 06, 2017 9:06 pm
by cnavarro
Enrico, please
Test add +1, +2, etc in this line
I can not prove the height difference with the previous version
ChgMenuMea( pMitStruct, Round( nWText * nFw, 0 ), ;
if( oItem:lSeparator, Int( nHItem * GetnHeightItem() ),;
Max( Round( nHItem * GetnHeightItem() * if( !lHFont, 1.5, 1 ), 0 ) + 1, GetSysMetrics( 15 ) ) ) )
Re: TMenuItem height
Posted: Sun May 07, 2017 10:14 am
by Enrico Maria Giordano
Compared with desktop right click menu, 4 is a little shorter and 5 is a little longer.
EMG