topic-21253

Posts: 811

Joined: Tue May 06, 2008 04:28 AM

Remove Menuitem
Posted: Tue Apr 05, 2011 01:48 AM

Dear All,

Is there way to remove a menuitem?

Kind regards,
Frances

Kind Regards,

Frances

Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15

Robert Frank

Posts: 95

Joined: Fri Nov 23, 2007 04:43 AM

Re: Remove Menuitem
Posted: Tue Apr 05, 2011 06:21 AM

oWND:SetMenu(AgainBuildMenu())

Robert Frank

fraxzi

Posts: 811

Joined: Tue May 06, 2008 04:28 AM

Re: Remove Menuitem
Posted: Tue Apr 05, 2011 07:40 AM

Robert Frank wrote:oWND:SetMenu(AgainBuildMenu())

Hi Mr. Robert,

You mean I reset again the object's menu... hmmm... sounds logical.

Kind regards,
Frances

Kind Regards,

Frances

Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15

Enrico Maria Giordano

Posts: 9022

Joined: Thu Oct 06, 2005 08:17 PM

Re: Remove Menuitem
Posted: Tue Apr 05, 2011 09:11 AM

Or

Code (fw): Select all Collapse

oMenuItem:Destroy()

EMG

Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

Robert Frank

Posts: 95

Joined: Fri Nov 23, 2007 04:43 AM

Re: Remove Menuitem
Posted: Tue Apr 05, 2011 10:57 AM

With oWND:SetMenu depends on the user right you can change menu "on-line", its easier for me to build menu again, then destroy menuitem.

...
oWND:SetMenu(AgainBuildMenu())
...

Function AgainBuildMenu()
Local oMENU

MENU o MENU 2007
....
If User_Have_Right(right_number_1)
MENUITEM .....
MENUITEM .....
EndIf
If User_Have_Right(right_number_2)
MENUITEM .....
MENUITEM .....
EndIf

ENDMENU

...
Return oMENU

Robert Frank

fraxzi

Posts: 811

Joined: Tue May 06, 2008 04:28 AM

Re: Remove Menuitem
Posted: Wed Apr 06, 2011 06:06 AM

Dear Mr. Enrico and Mr. Robert,

Thank you for your help. Greatly appreciated!

Kind Regards,
Frances

Kind Regards,

Frances

Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15

FiveTech Support Forums

Continue the discussion