Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle
Classe TGet

...

Classe

...

TGet

Cria

...

um

...

objeto

...

para

...

entrada

...

de

...

dados

...

editáveis. Esta

...

classe

...

permite

...

armazenar

...

ou

...

alterar

...

o

...

conteúdo

...

de

...

uma

...

variável

...

através

...

da

...

digitação.

...

No

...

entanto,

...

o

...

conteúdo

...

da

...

variável

...

será

...

alterado

...

quando

...

o

...

objeto

...

perder

...

o

...

foco

...

de

...

edição

...

para

...

outro

...

objeto.

Hierarquia

...

...

    • TGet

Construtores

Create

Método construtor da classe.

TGet(): Create ( [ oWnd], [ bSetGet], [ nRow], [ nCol], [ nWidth], [ nHeight], [ cPict], [ bValid], [ nClrFore], [ nClrBack], [ oFont], [ uParam12], [ uParam13], [ lPixel], [ uParam15], [ uParam16], [ bWhen], [ lCenter], [ lRight], [ bChange], [ lReadOnly], [ lPassword], [ uParam23], [ cReadVar], [ uParam25], [ uParam26], [ uParam27], [ uParam28], [ uParam29], [ uParam30], [cLabelText] ,[nLabelPos], [oLabelFont], [nLabelColor], [cPlaceHold]) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
bSetGetBloco de códigoIndica o bloco de código, no formato {|u| if( Pcount( )>0, := u, ) }, que será executado para atualizar a variável (essa variável deve ser do tipo caracter). Desta forma, se a lista for sequencial, o controle atualizará com o conteúdo do item selecionado, se for indexada, será atualizada com o valor do índice do item selecionado.  
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
cPictCaracterIndica a máscara de formatação, do conteúdo, que será apresentada. Verificar Tabela de Pictures de Formatação  
bValidBloco de código

Indica o bloco de código de validação, que será executado quando este objeto estiver em foco, e o operador tentar mover o foco para outro componente da interface. Caso o bloco executado retorne .T., será permitida a mudança de foco. Caso o bloco executado retorne .F., não será permitido a remoção do foco do componente.

  
nClrForeNuméricoIndica a cor do texto do objeto.  
nClrBackNuméricoIndica a cor de fundo do objeto.  
oFontObjetoIndica o objeto, do tipo TFont, que será utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.  
uParam12LógicoCompatibilidade.  
uParam13ObjetoCompatibilidade.  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
uParam15CaracterCompatibilidade.  
uParam16LógicoCompatibilidade.  
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, no objeto criado, estiver sendo realizada. Se o retorno for verdadeiro (.T.), o objeto continua habilitado; caso contrário, falso (.F.).  
lCenterLógicoCompatibilidade.  
lRightLógicoCompatibilidade.  
bChangeBloco de códigoIndica o bloco de código que será executado quando o estado ou conteúdo do objeto é modificado pela ação sobre o controle visual.  
lReadOnlyLógicoIndica se o objeto pode ser editado.  
lPasswordLógicoIndica se, verdadeiro (.T.), o objeto apresentará asterisco (*) para entrada de dados de senha; caso contrário, falso (.F.).  
uParam23CaracterCompatibilidade.  
cReadVarCaracterIndica o nome da variável, configurada no parâmetro , que será manipulada pelo objeto. Além disso, esse parâmetro será o retorno da função ReadVar().  
uParam25CaracterCompatibilidade.  
uParam26CaracterCompatibilidade.  
uParam27LógicoCompatibilidade.  
lHasButtonLógicoSe definido .T. indica que deve ser aplicado o botão para seleção de Data ou Calculadora.  
uParam29LógicoCompatibilidade.  
uParam30LógicoCompatibilidade  
cLabelTextCaractereindica o texto que será apresentado na Label.  
nLabelPosNuméricoIndica a posição da label, sendo 1=Topo e 2=Esquerda  
oLabelFontObjetoIndica o objeto, do tipo TFont, que será utilizado para definir as características da fonte aplicada na exibição da label.  
nLabelColorNuméricoIndica a cor do texto da Label.  
cPlaceHoldCaractereDefine o texto a ser utilizado como place holder, ou seja, o texto que ficará escrito em cor mais opaca quando nenhuma informação tiver sido digitada no campo. (disponível em builds superiores a 7.00.121227P)  

 

oObjeto
    ()
  • Retorna o objeto criado.
Em versões superiores à 120420A foi implementada a opção para definição de uma label(descrição) do componente visual. Preenchendo os parâmetros cLabelText, nLabelPos, oLabelFont e nLabelColor será disponibilizada, ao topo ou à esquerda, a descrição definida para o componente. Esta característica visa diminuir a quantidade de interações entre o SmartClient e o AppServer na construção de telas, otimizando assim este processo.
 Quando utilizada esta opção não será possível alinhar o componente, sendo a Label um objeto independente ela não será alinhada juntamente com o Controle principal, nesta situação é necessário fazer o posicionamento manualmente.
cTGet2 := "Teste TGet 02"oTGet2 := TGet():Create( oDlg,{||cTGet2},14,01,096,009,;"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet2,,,, )

New

Método construtor da classe.

TGet(): New ( [ nRow], [ nCol], [ bSetGet], [ oWnd], [ nWidth], [ nHeight], [ cPict], [ bValid], [ nClrFore], [ nClrBack], [ oFont], [ uParam12], [ uParam13], [ lPixel], [ uParam15], [ uParam16], [ bWhen], [ uParam18], [ uParam19], [ bChange], [ lReadOnly], [ lPassword], [ uParam23], [ cReadVar], [ uParam25], [ uParam26], [ uParam27], [ lHasButton], [ lNoButton], [cLabelText] ,[nLabelPos], [oLabelFont], [nLabelColor], [cPlaceHold] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
bSetGetBloco de códigoIndica o bloco de código, no formato {|u| if( Pcount( )>0, := u, ) }, que será executado para atualizar a variável (essa variável deve ser do tipo caracter). Desta forma, se a lista for sequencial, o controle atualizará com o conteúdo do item selecionado, se for indexada, será atualizada com o valor do índice do item selecionado.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
cPictCaracterIndica a máscara de formatação, do conteúdo, que será apresentada. Verificar Tabela de Pictures de Formatação  
bValidBloco de códigoIndica o bloco de código de validação que será executado quando o conteúdo do objeto for modificado. Retorna verdadeiro (.T.), se o conteúdo é válido; caso contrário, falso (.F.).  
nClrForeNuméricoIndica a cor do texto do objeto.  
nClrBackNuméricoIndica a cor de fundo do objeto.  
oFontObjetoIndica o objeto, do tipo TFont, que será utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.  
uParam12LógicoCompatibilidade.  
uParam13ObjetoCompatibilidade.  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
uParam15CaracterCompatibilidade.  
uParam16LógicoCompatibilidade.  
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, no objeto criado, estiver sendo realizada. Se o retorno for verdadeiro (.T.), o objeto continua habilitado; caso contrário, falso (.F.).  
uParam18LógicoCompatibilidade.  
uParam19LógicoCompatibilidade.  
bChangeBloco de códigoIndica o bloco de código que será executado quando o estado ou conteúdo do objeto é modificado pela ação sobre o controle visual.  
lReadOnlyLógicoIndica se o objeto pode ser editado.  
lPasswordLógicoIndica se, verdadeiro (.T.), o objeto apresentará asterisco (*) para entrada de dados de senha; caso contrário, falso (.F.).  
uParam23CaracterCompatibilidade.  
cReadVarCaracterIndica o nome da variável, configurada no parâmetro bSetGet, que será manipulada pelo objeto. Além disso, esse parâmetro será o retorno da função ReadVar().  
uParam25CaracterCompatibilidade.  
uParam26CaracterCompatibilidade.  
uParam27LógicoCompatibilidade.  
lHasButtonLógicoIndica se, verdadeiro (.T.), o uso dos botões padrão, como calendário e calculadora.  
lNoButtonLógicoOculta o botão F3 (HasButton).  
cLabelTextCaractereindica o texto que será apresentado na Label.  
nLabelPosNuméricoIndica a posição da label, sendo 1=Topo e 2=Esquerda  
oLabelFontObjetoIndica o objeto, do tipo TFont, que será utilizado para definir as características da fonte aplicada na exibição da label.  
nLabelColorNuméricoIndica a cor do texto da Label.  
cPlaceHoldCaractereDefine o texto a ser utilizado como place holder, ou seja, o texto que ficará escrito em cor mais opaca quando nenhuma informação tiver sido digitada no campo. (disponível em builds superiores a 7.00.121227P)  

 

oObjeto
    ()
  • Retorna o objeto criado.
Em versões superiores à 120420A foi implementada a opção para definição de uma label(descrição) do componente visual. Preenchendo os parâmetros cLabelText, nLabelPos, oLabelFont e nLabelColor será disponibilizada, ao topo ou à esquerda, a descrição definida para o componente. Esta característica visa diminuir a quantidade de interações entre o SmartClient e o AppServer na construção de telas, otimizando assim este processo.
cTGet1 := "Teste TGet 01"oTGet1 := TGet():New( 01,01,{||cTGet1},oDlg,096,009,;"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,, )

CtrlRefresh

Força a atualização do objeto.

TGet(): CtrlRefresh ( ) -->

 
oTGet:CtrlRefresh()

SelectAll

Seleciona todo o conteúdo da Get.

TGet(): SelectAll ( ) -->

 
oTGet:SelectAll()

Inclusão de trecho
Classe TGet - Construtores
Classe TGet - Construtores
nopaneltrue

Propriedades

Inclusão de trecho
Classe TGet - Propriedades
Classe TGet - Propriedades
nopaneltrue

Métodos

Inclusão de trecho
Classe TGet - Métodos
Classe TGet - Métodos
nopaneltrue

Observações

  • Em builds superiores a 7.00.111010P o idioma do calendário, chamado a partir do componente TGet, respeitará o idioma definido no arquivo de inicialização do AppServer, na tag rpolanguage.
  • Em builds superiores a 7.00.121227P, caso o TGet tenha botão (calculadora, calendário, etc.), o CSS deste botão pode ser passado para o TGet que ele irá repassar para o botão.

SetContentAlign

Alinha o conteúdo interno do objeto.

TGet(): SetContentAlign ( < nAlign> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nAlignNuméricoIndica o tipo de alinhamento. Para informações dos tipos disponíveis, consulte a área Observações.X 

 

...

ValorDescrição
-1Alinha conteúdo à esquerda.
0Centraliza conteúdo.
1Alinha conteúdo à direita.

 

 

Importante
Método disponível para builds da TOTVS Tec superiores a "7.00.080806P - Oct  2 2008 - 11:47:14"

 

...

...

borderColor#95B0CB
bgColor#FFFFFF
borderWidth1
borderStylesolid

Definindo os tipos de dados (Caracter, Data, Numerico)

...

A definição dos tipos de dados no componente TGet é feito a partir de dois pontos:

...

  1. Definição do tipo de variável;

...

  1. Definição do parametro lHasButton como Verdadeiro (.T.).

Veja o exemplo a seguir:

Exemplocodetrue
Bloco de código
language
cpp
themeEclipse
languagecpp
linenumbers
false
collapsefalse
  #include "TOTVS.CH"

  User Function TGetTypes()
    Local cGet1 := "Define variable value" // Variavel do tipo caracter
    Local nGet2 := 0 // Variável do tipo numérica
    Local dGet3 := Date() // Variável do tipo Data
    Local lHasButton := .T.

    DEFINE MSDIALOG oDlg TITLE "Picture test" FROM 000, 000  TO 500, 500 COLORS 0, 16777215 PIXEL

    oGet1 := TGet():New( 005, 009, { | u | If( PCount() == 0, cGet1, cGet1 := u ) },oDlg, ;
     
  060, 010, "!@",, 0, 16777215,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F. ,,"cGet1",,,,lHasButton  )
    oGet2 := TGet():New( 020, 009, { | u | If( PCount() == 0, nGet2, nGet2 := u ) },oDlg, ;
       
060, 010, "@E 999.99",, 0, 16777215,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F. ,,"nGet2",,,,lHasButton  )
    
oGet3 := TGet():New( 035, 009, { | u | If( PCount() == 0, dGet3, dGet3 := u ) },oDlg, ;
     
  060, 010, "@D",, 0, 16777215,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F. ,,"dGet3",,,,lHasButton  )

    ACTIVATE MSDIALOG oDlg CENTERED
  return

Preview - TGet com diferentes tipos de dados

Image Modified

...

Exemplos

 PropriedadeDescriçãoTipo

 

Em builds superiores a 7.00.111010P o idioma do calendário, chamado a partir do componente TGet, respeitará o idioma definido no arquivo de inicialização do AppServer, na tag rpolanguage.
Em builds superiores a 7.00.121227P, caso o TGet tenha botão (calculadora, calendário, etc.), o CSS deste botão pode ser passado para o TGet que ele irá repassar para o botão.
#include "TOTVS.CH"



  User Function TGet()


    DEFINE DIALOG oDlg TITLE "Exemplo TGet" FROM 180,180 TO 550,700 PIXEL

    

// Usando o New
    

cTGet1 := "Teste TGet 01"


    oTGet1 := TGet():New( 01,01,{|u|if(PCount()==0,cTGet1,cTGet1:=u)},oDlg,096,009,; 
		"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,, )


    // Usando o Create


    cTGet2 := "Teste TGet 02"


    oTGet2 := TGet():Create( oDlg,{|u|if(PCount()==0,cTGet2,cTGet2:=u)},14,01,096,009,; 
		"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet2,,,, )


    ACTIVATE DIALOG oDlg CENTERED
  Return
Preview

Bloco de código
language
cpp
themeEclipse
linenumbersfalse
collapsefalse
  
cBufferRetorna o texto definido para o objeto.Caracter
cPictVarIndica a máscara de formatação, do conteúdo, que será apresentada. Verificar Tabela de Pictures de FormataçãoCaracter
cTextRetorna o texto definido para o objeto.Caracter
lPasswordIndica se, verdadeiro (.T.), o objeto apresentará asterisco (*) para entrada de dados de senha; caso contrário, falso (.F.).Lógico
cPlaceHoldTexto a ser usado como place holder, ou seja, que será exibido em cor mais opaca quando não tiver sido digitada nenhuma informação no campo. (disponível em builds superiores a 7.00.121227P)Caractere

Exemplo da classe TGet

Image Modified

Referências

A construção de um componente da classe TGET também pode ser feita através do comando AdvPL @ .. GET

Abrangência

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server

...