GET HIGHLIGHT
GET HIGHLIGHT ( {Objeto ;} area ; inicioSel ; fimSel )
| Parâmetro | Tipo | Descrição | |
|---|---|---|---|
| Objeto | * | → | Se especificado, objeto é um nome de objeto (string=. Se omitido, objeto é um campo ou variável |
| area | Field, Variable, any | → | Nome de objeto (se * for especificado) ou Campo ou variável (se * for omitido) |
| inicioSel | Integer | ← | Posição inicial da seleção atual de texto |
| fimSel | Integer | ← | Posição final da seleção atual de texto |
Esse comando não é seguro para thread e não pode ser usado em código adequado.
Descrição
O comando GET HIGHLIGHT permite determinar o texto selecionado atualmente em objeto.
Se passa o parâmetro opcional *, indica que o parâmetro objeto é um nome de objeto (cadeia). Se não passa o parâmetro *, indica que o parâmetro objeto é um campo ou variável. Neste caso, passe a referencia do campo ou variável (campos ou variáveis de formulário apenas) ao invés de uma cadeia.
Nota: Este comando não pode ser utilizado com campos localizados no formulário listado de um subformulário.
O texto pode ser selecionado pelo usuário ou pelo comando HIGHLIGHT TEXT.
O parâmetro inicioSel retorna a posição do primeiro caractere selecionado.
O parâmetro finalSel retorna a posição do último caractere selecionado mais um.
Se os valores retornados de inicioSel e finalSel são iguais, o usuário não selecionou nenhum texto, e o ponto de inserção está localizado antes do caractere especificado por inicioSel.
Se o objeto designado pelo parâmetro objeto não é encontrado no formulário, o comando devolve -1 em inicioSel e -2 em finalSel.
Exemplo 1
O exemplo abaixo obtém o texto selecionado no campo [Produtos]Comentarios:
GET HIGHLIGHT([Produtos]Comentarios;vFirst;vLast)
If(vFirst<vlast) alert("o="" texto="" selecionado="" é:="" "+substring([produtos]comentarios;vprimerot;vultimo-vprimeiro))="" end="" if<="" pre=""></vlast)>
Exemplo 2
Ver exemplo para o comando FILTER KEYSTROKE.
Exemplo 3
Modificação do estilo do texto ressaltado:
GET HIGHLIGHT(*;"meuTexto";$startsel,$endsel)
ST SET ATTRIBUTES(*;"meuTexto";$startsel,$endsel;Attribute underline style;1;Attribute bold style;1)