Fórum Desabilitar Menu #256397
28/10/2004
0
Valeu a força !!
JR.
Jrjoliv2003
Curtir tópico
+ 0Posts
28/10/2004
Aroldo Zanela
Exatamente da forma que citou, ou seja, basta referenciar o objeto pelo nome e atribuir o valor False à propriedade Enabled. Ex:
mnuProdutos.Enabled := false;
Gostei + 0
28/10/2004
Jrjoliv2003
Não encontrei isso não!!
Valeu a força!!
JR.
Gostei + 0
29/10/2004
Emerson Nascimento
+---------------+--------------+----------+ |Arquivos | Editar | Exibir | +---------------+--------------+----------+ |Abrir |Copiar |Código | |Salvar |Recortar |Fonte | |Salvar como... |Colar +----------+ +---------------+--------------+ |Importar | |Exportar | +---------------+ |Sair | +---------------+
Cada item do menu é um componente com um nome distinto.
Por exemplo: [b:e9a5395bde]Abrir[/b:e9a5395bde] se chama Abrir1, [b:e9a5395bde]Salvar Como...[/b:e9a5395bde] se chama SalvarComo1, etc.
Então basta fazer:
Abrir1.Enabled := False;
SalvarComo1.Enabled := True;
Entendido?
Gostei + 0
29/10/2004
Jrjoliv2003
Valeu a força!!
JR.
Gostei + 0
30/10/2004
Aroldo Zanela
Sem querer entrar no mérito da utilizade, use:
var i: SmallInt;
begin
for i:=0 to componentcount-1 do
if Components[i] is TMenuItem then
TMenuItem( Components[i] ).Enabled := false;
end;Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)