Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Go Back   Foros Club Delphi > Principal > Varios
Register FAQ Members List Calendar Guía de estilo Search Today's Posts Mark Forums Read

Coloboración Paypal con ClubDelphi

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 18/06/2012
hondaalberto hondaalberto is offline
Miembro
 
Join Date: Sep 2010
Location: República Dominicana
Posts: 67
Poder: 16
hondaalberto Va por buen camino
Inabilitar Opción de un Componente MainMenu

Buenos días Amigos

Tengo un Componente MainMenu que contiene el menu de Mantenimientos con las Siguientes Opciones:

Mantenimientos
Clientes
Proveedores
Ciudad
Pais

Me gustaria saber como puedo hacer para presentar que una opción de estas aparezca como no dispobible al igual que cuando lo hacemos por la propiedad enable del componente MainMenu. Pero necesito hacerlo por código porque que eso solo debe suceder si a un usuario no le quiero tener habilitada una opción en especifico.
Reply With Quote
  #2  
Old 18/06/2012
microbiano's Avatar
microbiano microbiano is offline
Miembro
 
Join Date: Sep 2008
Location: Mexico D.F
Posts: 349
Poder: 18
microbiano Va por buen camino
puedes hacerlo de la siguiente manera

mnuMenu.Items[1].Items[1].Enabled := true;
mnuMenu.Items[1].Items[2].Enabled := false;
Reply With Quote
  #3  
Old 18/06/2012
hondaalberto hondaalberto is offline
Miembro
 
Join Date: Sep 2010
Location: República Dominicana
Posts: 67
Poder: 16
hondaalberto Va por buen camino
Muchas Gracias Microbiano por tu respuesta pero el código que me recomendaste me da el siguiente error cuando intento correr el programa:



-
Código Delphi [-]
--------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EListError with message 'List index out of bounds (1)'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help   
---------------------------
Reply With Quote
  #4  
Old 18/06/2012
Caro's Avatar
*Caro* Caro is offline
Moderadora
 
Join Date: Jul 2004
Location: Cochabamba, Bolivia
Posts: 2,544
Poder: 25
Caro Va por buen camino
Hola hondaalberto, seguramente no tienes un item en la posición 1, todos los items y subitems de tu MainMenu comienzan en 0.

Código Delphi [-]
 //también puedes hacerlo de esta forma
 mnuMenu.Items[0][1].Enabled := false;
 mnuMenu.Items[0][2].Enabled := false;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Reply With Quote
  #5  
Old 18/06/2012
microbiano's Avatar
microbiano microbiano is offline
Miembro
 
Join Date: Sep 2008
Location: Mexico D.F
Posts: 349
Poder: 18
microbiano Va por buen camino
jejejeje amigo era pa que tu lo adaptaras solo te di la idea principal jejeje
Reply With Quote
  #6  
Old 18/06/2012
hondaalberto hondaalberto is offline
Miembro
 
Join Date: Sep 2010
Location: República Dominicana
Posts: 67
Poder: 16
hondaalberto Va por buen camino
Muchas Gracias por sus aportes y el tiempo invertido. así me funcionó bien Caro. Gracias a ti también Microbiano.
Reply With Quote
Reply


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Como puedo bloquear/inabilitar el boton cerrar y maximizar de una ventana antonio302050 API de Windows 11 27/03/2010 17:58
Componente de Menu q no sea el MainMenu LCIdesarrollo Varios 3 09/12/2009 15:17
MainMenu Elias_02 OOP 3 16/04/2007 21:37
MainMenu silviodp OOP 1 27/07/2004 15:59
Inabilitar pantalla completa DOS StartKill API de Windows 1 17/05/2004 21:45


All times are GMT +2. The time now is 01:52.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi