| 4D v15.4Focus object | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D v15.4
 Focus object 
         | |||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Focus object -> Resultado | ||||||||
| Parâmetro | Tipo | Descrição | ||||||
| Resultado | Ponteiro |   | Ponteiro ao objeto que tem o foco | |||||
Este comando só é conservado por razões de compatibilidade. Começa com a versão 12 de 4D, recomenda-se que se use o comando OBJECT Get pointer.
Focus object retorna um ponteiro ao objeto que tem o foco no formulário atual. Se nenhum objeto tiver o foco, o comando retorna Nil.. Pode utilizar Focus object para realizar uma ação em um área de formulário sem saber qual objeto está selecionado atualmente. Tenha certeza  de testar se o objeto é do tipo correto, utilizando Type,, antes de realizar uma ação.
Nota: quando se utiliza com um list box de tipo array, a função Focus object retorna um ponteiro ao list box ou à coluna do list box dependendo do contexto. Para mais informação, veja a seção Gestão de objetos List Box
Este comando não pode ser utilizado com campos em sub-formulários.
Nota: este comando é utilizado apenas no contexto de entrada de dados, do contrário um erro é produzido
O exemplo abaixo é um método de objeto para um botão. O método de objeto modifica os dados no objeto atual a maiúsculas. O objeto deve ser do tipo texto ou alfa (tipo 0 ou 24): 
 $vp :=Focus object ` Obter o ponteiro ao último objeto
 Case of
    :(Nil($ponteiro)) ` Nenhum objeto tem o foco
       ...
    :((Type($vp->)=Is alpha field)|(Type($vp->)=Is string var)) ` Se for um objeto de tipo texto ou alfa
       $vp->:=Uppercase($vp->) ` Mudar os dados a maiúsculas
 End case
	Produto: 4D
	Tema: Interface de Usuário
	Número 
        278
        
        
        
	
	Modificado: 4D v11 SQL  
	
	
	Manual de linguagem 4D ( 4D v15.4)
	
	
	Manual de linguagem 4D ( 4D v15)
	
	
	
	
	
	
	
	
	Manual de linguagem 4D ( 4D v15.3)
	
	
 Adicionar um comentário
Adicionar um comentário