Antonio,
Example sent to you - let me know if you havent received it.
Regards,
Pete
MenuMeasureItem( pMitStruct,;
0.9 * GetTextWidth( 0, If( ! Empty( oItem:cPrompt ),;
StrTran( oItem:cPrompt, "&", "" ), "" ) ) + ;
If( oItem:oMenu:hMenu != If( ::oMenu != nil, ::oMenu:hMenu, 0 ), 30, 0 ),;
Empty( oItem:cPrompt ) )
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 34 guests