
Classe: TMultiGet
Cria um objeto do tipo campo memo.
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
| Nome | Tipo | Descrição | Obrigatório | Referência |
| oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. | | |
| bSetGet | Bloco de código | Indica 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. | | |
| nRow | Numérico | Indica a coordenada vertical em pixels ou caracteres. | | |
| nCol | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | | |
| nWidth | Numérico | Indica a largura em pixels do objeto. | | |
| nHeight | Numérico | Indica a altura em pixels do objeto. | | |
| oFont | Objeto | Indica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual. | | |
| lHScroll | Lógico | Indica se habilita(.T.)/desabilita(.F.) a barra de rolagem horizontal. | | |
| nClrFore | Numérico | Indica a cor de fundo do objeto. | | |
| nClrBack | Numérico | Indica a cor do texto objeto. | | |
| uParam11 | Objeto | Compatibilidade. | | |
| lPixel | Lógico | Indica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.). | | |
| uParam13 | Caracter | Compatibilidade. | | |
| uParam14 | Lógico | Compatibilidade. | | |
| bWhen | Bloco de código | Indica 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.). | | |
| uParam16 | Lógico | Compatibilidade. | | |
| uParam17 | Lógico | Compatibilidade. | | |
| lReadOnly | Lógico | Indica se o conteúdo da variável associada ao objeto permanecerá apenas para leitura. | | |
| bValid | Bloco de código | Indica 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.). | | |
| uParam20 | Bloco de código | Compatibilidade. | | |
| uParam21 | Lógico | Compatibilidade. | | |
| lNoBorder | Lógico | Indica se habilita(.T.)/desabilita(.F.) a apresentação da borda no objeto. | | |
| lNoVScroll | Lógico | Indica 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
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
| Nome | Tipo | Descrição | Obrigatório | Referência |
| nRow | Numérico | Indica a coordenada vertical em pixels ou caracteres. | | |
| nCol | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | | |
| bSetGet | Bloco de código | Indica 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. | | |
| oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. | | |
| nWidth | Numérico | Indica a largura em pixels do objeto. | | |
| nHeight | Numérico | Indica a altura em pixels do objeto. | | |
| oFont | Objeto | Indica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual. | | |
| lHScroll | Lógico | Indica se habilita(.T.)/desabilita (.F.) a barra de rolagem horizontal. | | |
| uParam9 | Numérico | Compatibilidade | | |
| uParam10 | Numérico | Compatibilidade | | |
| uParam11 | Objeto | Compatibilidade. | | |
| lPixel | Lógico | Indica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.). | | |
| uParam13 | Caracter | Compatibilidade. | | |
| uParam14 | Lógico | Compatibilidade. | | |
| bWhen | Bloco de código | Indica 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.). | | |
| uParam16 | Lógico | Compatibilidade. | | |
| uParam17 | Lógico | Compatibilidade. | | |
| lReadOnly | Lógico | Indica se o conteúdo da variável associada ao objeto permanecerá apenas para leitura. | | |
| bValid | Bloco de código | Indica 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.). | | |
| uParam20 | Bloco de código | Compatibilidade. | | |
| uParam21 | Lógico | Compatibilidade. | | |
| lNoBorder | Lógico | Indica se habilita(.T.)/desabilita(.F.) a apresentação da borda no objeto. | | |
| lNoVScroll | Lógico | Indica 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> ) -->
| Nome | Tipo | Descrição | Obrigatório | Referência |
| lEnable | Lógico | Indica 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> ) -->
| Nome | Tipo | Descrição | Obrigatório | Referência |
| lEnable | Lógico | Indica se habilita(.T.)/desabilita(.F.) a barra de rolagem vertical. | X | |
oTMultiget:EnableVScroll( .T. )
GoEnd
Posiciona o cursor no fim do texto.
TMultiGet(): GoEnd (
) -->
| Propriedade | Descrição | Tipo |
| lWordWrap | Indica se, verdadeiro (.T.), realizará a quebra automática de linhas; caso contrário, falso (.F.). | Lógico |
| nPos | Indica 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
|