Is editing text

4D v19.8

Is editing text


Is editing text -> Resultado

Parâmetro	Tipo	Descrição
Resultado	Booleano	True se texto estiver sendo digitado, senão False

Descrição

O comando Is editing text devolve True se o usuário estiver ingressando valores em um objeto de formulário de entrada e False em todos os demais casos.

Este comando se utiliza principalmente para distinguir, dentro do código ativado pelo evento de formulário On Before Keystroke, entre a entrada de dados de usuário real e o uso de teclas de acesso direto. Por exemplo, é possível que queira executar um código diferente se o usuário esteja pressionando uma tecla para ingressar texto em uma célula ou para deslocar-se pelo listbox, por ejemplo para implementar uma funcionalidade de teclado preditivo.

Notas:

O comando Is editing text sempre devolve True com objetos de entrada e combo.
O comando Is editing text sempre devolve False com todos os outros objetos, em particular áreas 4D Write Pro e 4D View Pro.

Exemplo

Se quiser permitir que o usuário selecione uma linha começando com a letra ou número digitado em uma listbox editável:

 Case of

    :(FORM Event.code=On Before Keystroke) //uma tecla é pressionada

       If(Is editing text) //texto é digitado

  // proíbe alguns caracteres

          If(Keystroke="+")|(Keystroke="-")|(Keystroke="/")|(Keystroke="*")

             FILTER KEYSTROKE("")

          End if

       Else

  //nada está sendo digitado, é a funcionalidade de deslocamento atalho

          $charCode:=Keystroke

          $char:=Uppercase($charCode) // remove acentos

          Case of

             :((($char>="A")&($char<="Z"))|(($char>="0")&($char<="9")))

                ... //Seleciona uma linha começando com a letra ou número digitado

             :($charCode>=Left arrow key)&($charCode<=Down arrow key) // flechas esquerda/direita/cima/embaixo

                FILTER KEYSTROKE("") // desativa ações das flechas

          End case

       End if

 End case

Ver também

FILTER KEYSTROKE
Get edited text