Classe de campo Memo de edição.

Hierarquia

tSrvObject -> tControl -> tMultiGet

Descrição

Utilize a classe tMultiget para criar controle de edição de texto de múltiplas linhas.

Propriedades

lWordWrapLógico. Se .T., faz quebra automática de linhas.

Métodos

New

Descrição

Construtor da classe.

Sintaxe

New([anRow], [anCol], [abSetGet], [aoWnd], [anWidth], [anHeight], [aoFont], [alHScroll], [anClrFore], [anClrBack], [oPar11], [alPixel], [cPar13], [lPar14], [abWhen], [lPar16], [lPar17], [alReadOnly], [abValid], [bPar20], [lPar21], [alNoBorder], [alNoVScroll])

Parâmetros

anRow

Numérico, opcional. Coordenada vertical em pixels ou caracteres.
AnColNumérico, opcional. Coordenada horizontal em pixels ou caracteres.
AbSetGetBloco de código, opcional. Bloco de código no formato {|u| if( Pcount( )>0, <var>:= u, <var> ) } que o controle utiliza para atualizar a variável <var>. <var> deve ser tipo caracter.
aoWnd

Objeto, opcional. Janela ou controle onde o controle será criado.

anWidth

Numérico, opcional. Largura do controle em pixels.

anHeight

Numérico, opcional. Altura do controle em pixels.

aoFont

Objeto, opcional. Objeto tipo tFont utilizado para definir as características da fonte utilizada para exibir o conteúdo do controle.

alHScroll

Lógico, opcional. Se .T., habilita barra de rolagem horizontal.

anClrFore

Numérico, opcional. Cor de fundo do controle.

anClrBack

Numérico, opcional. Cor do texto do controle.

oPar11

Reservado.

alPixel

Lógico, opcional. Se .T. as coordenadas informadas são em pixels, se .F. são em caracteres.

cPar13

Reservado.

lPar14

Reservado.

abWhen

Bloco de código, opcional. Executado quando mudança de foco de entrada de dados está sendo efetuada na janela onde o controle foi criado. O bloco deve retornar .T. se o controle deve permanecer habilitado ou .F. se não.

lPar16

Reservado.

lPar17

Reservado.

alReadOnly

Lógico, opcional. Se .T. o controle so permitira leitura.

abValid

Bloco de código, opcional. Executado quando o conteúdo do controle deve ser validado, deve retornar .T. se o conteúdo for válido e .F. quando o conteúdo for inválido.

bPar20

Reservado.

lPar21

Reservado.

alNoBorder

Lógico, opcional. Se .T. cria controle sem borda.

alNoVScroll

Lógico, opcional. Se .T., habilita barra de rolagem vertical.

Retorno

O objeto construído.

EnableVScroll

Descrição

Habilita a barra de rolagem vertical.

Sintaxe

EnableVScroll( lEnable )

Parâmetros

lEnableLógico, obrigatório. Se .T. habilita se .F. desabilita a barra de rolagem.

Retorno

NIL

 

EnableHScroll

Descrição

Habilita a barra de rolagem horizontal.

Sintaxe

EnableHScroll( lEnable )

Parâmetros

lEnable

Lógico, obrigatório. Se .T. habilita se .F. desabilita a barra de rolagem.

Retorno

NIL

Exemplo

#include “protheus.ch”

User Function Teste()

Local oDlg, oMemo, cMemo:= space(50)

DEFINE MSDIALOG oDlg FROM 0,0 TO 400,400 PIXEL TITLE “My test”

oMemo:= tMultiget():New(10,10,{|u|if(Pcount()>0,cMemo:=u,cMemo)};

,oDlg,100,100,,,,,,.T.)

@ 200,10 BUTTON oBtn PROMPT “Fecha” OF oDlg PIXEL ACTION oDlg:End()

ACTIVATE MSDIALOG oDlg CENTERED

MsgStop(cMemo)

 

Return Nil

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Necessita de ajuda?