Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição

Localizado no Este Ponto de Entrada está localizado na rotina Perfil do Cliente para permitir desabilitar (TMSA480),  permite desabilitar os botões padrão disponíveis para os usuários nas , disponíveis na opção Ações Relacionadas.

Observações

Exemplos

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

vetor PARAMIXB contendo vetor dos botões padrão.

Retorno

vetor contendo vetor dos botões padrão.

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

TMSA480.PRW

Bloco de código
languagedelphi
titleExemplosExemplo
User Function TM480DEL()
 Local aRetPE 	:= PARAMIXB[1]
 Local nX 		:= 0              
 
 //-- pesquisar botao
If (nX := aScan(aRetPE,{|x| "F4"$x[1]})) > 0 
 
	//-- excluir botao
  	aDel(aRetPE,nX)
  	
//-- redimensionar vetor
  	aSize(aRetPE,Len(aRetPE)-1)
 EndIf
 
//-- pesquisar Atalho                        
//-- 115 refere-se a tecla de atalho F4
If (nX := aScan(aSetKey,{|x| x[1]=115})) > 0
 	 
	//-- excluir botao
 	aDel(aSetKey,nX)
 	
	//-- redimensionar vetor 	 
	aSize(aSetKey,Len(aSetKey)-1)
 EndIf
Return aRetPE