Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Classe: TMultiGet

Cria um objeto do tipo campo memo.


TSrvObject -> TControl -> TMultiGet


Create

Método construtor da classe.


TMultiGet(): Create ( [ oWnd], [ bSetGet], [ nRow], [ nCol], [ nWidth], [ nHeight], [ oFont], [ lHScroll], [ nClrFore], [ nClrBack], [ uParam11], [ lPixel], [ uParam13], [ uParam14], [ bWhen], [ uParam16], [ uParam17], [ lReadOnly], [ bValid], [ uParam20], [ uParam21], [ lNoBorder], [ lNoVScroll] ) --> 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.
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.
lHScrollLógicoIndica se habilita(.T.)/desabilita(.F.) a barra de rolagem horizontal.
nClrForeNuméricoIndica a cor de fundo do objeto.
nClrBackNuméricoIndica a cor do texto objeto.
uParam11ObjetoCompatibilidade.
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).
uParam13CaracterCompatibilidade.
uParam14LógicoCompatibilidade.
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.) se o controle permanecer habilitado; caso contrário, retornará falso (.F.).
uParam16LógicoCompatibilidade.
uParam17LógicoCompatibilidade.
lReadOnlyLógicoIndica se o conteúdo da variável associada ao objeto permanecerá apenas para leitura.
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.).
uParam20Bloco de códigoCompatibilidade.
uParam21LógicoCompatibilidade.
lNoBorderLógicoIndica se habilita(.T.)/desabilita(.F.) a apresentação da borda no objeto.
lNoVScrollLógicoIndica se habilita(.T.)/desabilita(.F.) a barra de rolagem vertical.
    oObjeto(objeto)
  • Retorna o objeto criado.

cTexto2 := "Linha 01 Multiget 2"oTMultiget2 := TMultiget():Create(oDlg,{|u|if(Pcount()>0,cTexto2:=u,cTexto2)},92,01,;                           260,92,,,,,,.T.)
New

New

Método construtor da classe.


TMultiGet(): New ( [ nRow], [ nCol], [ bSetGet], [ oWnd], [ nWidth], [ nHeight], [ oFont], [ lHScroll], [ uParam9], [ uParam10], [ uParam11], [ lPixel], [ uParam13], [ uParam14], [ bWhen], [ uParam16], [ uParam17], [ lReadOnly], [ bValid], [ uParam20], [ uParam21], [ lNoBorder], [ lNoVScroll] ) --> 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.
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.
lHScrollLógicoIndica se habilita(.T.)/desabilita (.F.) a barra de rolagem horizontal.
uParam9NuméricoCompatibilidade
uParam10NuméricoCompatibilidade
uParam11ObjetoCompatibilidade.
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).
uParam13CaracterCompatibilidade.
uParam14LógicoCompatibilidade.
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.) se o controle permanecer habilitado; caso contrário, retornará falso (.F.).
uParam16LógicoCompatibilidade.
uParam17LógicoCompatibilidade.
lReadOnlyLógicoIndica se o conteúdo da variável associada ao objeto permanecerá apenas para leitura.
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.).
uParam20Bloco de códigoCompatibilidade.
uParam21LógicoCompatibilidade.
lNoBorderLógicoIndica se habilita(.T.)/desabilita(.F.) a apresentação da borda no objeto.
lNoVScrollLógicoIndica se habilita(.T.)/desabilita(.F.) a barra de rolagem vertical.
    oObjeto()
  • Retorna o objeto criado.

cTexto1 := "Linha 01 Multiget 1"oTMultiget1 := TMultiget():New(01,01,{|u|if(Pcount()>0,cTexto1:=u,cTexto1)},;                           oDlg,260,92,,,,,,.T.)

AppendText

Adiciona um texto no fim do texto já existente.


TMultiGet(): AppendText ( ) --> cTexto

    cTexto(caracter)
  • Indica o texto que será incluído.

oTMultiget:AppendText( "Novo Texto" )

EnableHScroll

Habilita/desabilita a barra de rolagem horizontal.


TMultiGet(): EnableHScroll ( < lEnable> ) -->


NomeTipoDescriçãoObrigatórioReferência
lEnableLógicoIndica se habilita(.T.)/desabilita(.F.) a barra de rolagem horizontal. X

oTMultiget:EnableHScroll( .T. )

EnableVScroll

Habilita/desabilita a barra de rolagem vertical.


TMultiGet(): EnableVScroll ( < lEnable> ) -->


NomeTipoDescriçãoObrigatórioReferência
lEnableLógicoIndica se habilita(.T.)/desabilita(.F.) a barra de rolagem vertical. X

oTMultiget:EnableVScroll( .T. )

GoEnd

Posiciona o cursor no fim do texto.


TMultiGet(): GoEnd ( ) -->


oTMultiget:GoEnd()

PropriedadeDescriçãoTipo
lWordWrapIndica se, verdadeiro (.T.), realizará a quebra automática de linhas; caso contrário, falso (.F.).Lógico
nPosIndica a posição do cursor.Numérico

Esse objeto permite editar texto de múltiplas linhas.


#include "TOTVS.CH"User Function TMultiget()  DEFINE DIALOG oDlg TITLE "Exemplo TMultiget" FROM 180,180 TO 550,700 PIXEL	    // Usando o New    cTexto1 := "Linha 01 Multiget 1"    oTMultiget1 := TMultiget():New(01,01,{|u|if(Pcount()>0,cTexto1:=u,cTexto1)},;                           oDlg,260,92,,,,,,.T.)                               // Usando o Create    cTexto2 := "Linha 01 Multiget 2"    oTMultiget2 := TMultiget():Create(oDlg,{|u|if(Pcount()>0,cTexto2:=u,cTexto2)},92,01,;                           260,92,,,,,,.T.)         ACTIVATE DIALOG oDlg CENTERED Return

Exemplo da classe TMultiGet

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

  • Sem rótulos