Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: AVField2Speak
Descrição: Retorna as características e valores de um determinado campo. Sintaxe: AVField2Speak ( [ lRequired ]cCtrlTypecName [ nSize ] [ cValue ] [ IsLookup ] [ cLookupText ] ) --> cFieldInfo Retorno:
Observações Esta função está disponível apenas no modo de Acessibilidade Visual. Exemplos #Include "PROTHEUS.ch"#Include "FWMVCDEF.CH"User Function ACV_Tst2()Local oGet,cGet:="Meu Nome",oCombo,nCombo:=1,oCheck,lCheck:=.T.,oList,nList:=1Local aItems:={"1=Sexo Masculino","2=Sexo Feminino"}Local cTitle := "Customizações para Acessibilidade Visual"AVSpeak(cTitle,.T.) // Reproduz o titulo da JanelaDEFINE MSDIALOG oDlg TITLE cTitle FROM 0,0 TO 150,500 PIXEL // -------------------------------------------------- // Cria Formulário Manualmente // -------------------------------------------------- @ 006, 002 MSGET oGet VAR cGet SIZE 060, 010 OF oDlg PIXEL oGet:lFocusOnFirst := .T. // Força bGotFocus na abertura da Janela @ 006, 080 MSCOMBOBOX oCombo VAR nCombo ITEMS aItems SIZE 061, 010 OF oDlg PIXEL @ 006, 160 CHECKBOX oCheck VAR lCheck PROMPT "Ativo" SIZE 060, 008 OF oDlg PIXEL @ 20,02 LISTBOX oList VAR nList ITEMS aItems SIZE 100,50 OF oDlg PIXEL // -------------------------------------------------- // Aplica Acessibilidade Visual // -------------------------------------------------- oGet:bGotFocus := {|| AVSpeak(AVField2Speak(.T.,"C","Nome",Len(cGet),cGet)) } oCombo:bGotFocus := {|oCombo| AVCombo2List(oCombo, "Sexo") } oCheck:bLClicked := {|| AVSpeak(AVField2Speak(,"L","Ativo",0,AVValue2Speak("L", lCheck))) } oCheck:bGotFocus := {|| Eval(oCheck:bLClicked) } oList:bChange := {|| AVSpeak(AVField2Speak(,"C","Sexo",0,AVValue2Speak("N", nList))) } oList:bGotFocus := {|| Eval(oList:bChange) }ACTIVATE MSDIALOG oDlg CENTEREDReturn Parâmetros:
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas