Árvore de páginas

Versões comparadas

Chave

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

Pagetitle
Classe TSrvObject

...

Classe

...

TSrvObject

Classe

...

abstrata

...

herdada

...

por

...

todos

...

os

...

componentes

...

visuais.

Hierarquia

...

ClassName

...

  • TSrvObject

...

cClasse
    (caracter)
  • Retorna o nome da classe.
oObject:ClassName()   // Result: "TButton"

CoorsUpdate

<p>Atualiza o posicionamento (vertical superior, horizontal esquerda, vertical inferior e horizontal direita) do objeto.</p>

TSrvObject(): CoorsUpdate ( ) -->

oObject:CoorsUpdate()

Disable

<p>Desabilita o objeto.</p>

TSrvObject(): Disable ( ) -->

oObject:Disable()

Enable

<p>Habilita o objeto.</p>

TSrvObject(): Enable ( ) -->

oObject:Enable()

FreeChildren

<p>Elimina/Libera todos os objetos da classe onde este método é chamado.</p>

TSrvObject(): FreeChildren ( ) -->

oObject:FreeChildren()

GetClientRect

Retorna as coordenadas de posicionamento e dimensão (vertical superior, horizontal à esquerda, vertical inferior e horizontal à direita) do objeto.

TSrvObject(): GetClientRect ( ) --> aCoords

aCoords
    ()
  • Retorna um array com as coordenadas de posicionamento e dimensão (vertical superior, horizontal esquerda, vertical inferior e horizontal direita) do objeto.

O retorno é o valor real do objeto criado, que na verdade é diferente do parâmetro da criação. Isso porque o sistema sempre duplica os valores passados no momento da criação.

oObject:GetClientRect()   // Result: {10,10,240,340}

Métodos

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

Observações

Esta classe não pode ser instanciada diretamente.

Propriedades

GetFont

<p>Retorna a fonte do objeto.</p>

TSrvObject(): GetFont ( ) --> oFont

oFont
    ()
  • Retorna o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.
oObject:GetFont()

GetText

<p>Retorna o título do objeto contido na propriedade cCaption.</p>

TSrvObject(): GetText ( ) --> cCaption

cCaption
    (caracter)
  • Retorna o título do objeto.
oObject:GetText()

Hide

<p>Torna o objeto invisível.</p>

TSrvObject(): Hide ( ) -->

oObject:Hide()

hWHandle

<p>Retorna o handle do objeto.</p>

TSrvObject(): hWHandle ( ) --> nHdl

nHdl
    ()
  • Retorna o handle do objeto.
oObject:hWHandle()   // Result: 3001

lCanGotFocus

<p>Define se o objeto pode ou não receber foco.</p>

TSrvObject(): lCanGotFocus ( < lFoco> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
lFocoLógicoIndica se, verdadeiro (.T.), o objeto pode receber foco; caso contrário, falso (.F.).X 

 

oBtn:lCanGotFocus := .T.

Move

<p>Move o objeto.</p>

TSrvObject(): Move ( [ nTop], [ nLeft], [ nWidth], [ nHeight], [ uParam5], [ lRealCoords] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nTopNuméricoIndica a posição ao topo.  
nLeftNuméricoIndica a posição à esquerda.  
nWidthNuméricoIndica a largura do objeto.  
nHeightNuméricoIndica a altura do objeto.  
uParam5QualquerCompatibilidade  
lRealCoordsLógicoIndica se as bordas do objeto serão consideradas no cálculo de movimentação.  

 

oObject:Move(oObject:nTop,oObject:nLeft,498,250,,.T.)

Owner

<p>Retorna o objeto do tipo tWindow ou tDialog utilizado na criação desta classe.</p>

TSrvObject(): Owner ( ) --> xObjeto

xObjeto
    ()
  • Retorna o objeto do tipo tWindow ou tDialog onde este foi criado.
oObject:Owner()

Refresh

<p>Atualiza as propriedades do objeto no TOTVS Smart Client.</p>

TSrvObject(): Refresh ( ) -->

oObject:Refresh()

SaveAsBMP

<p>Salva uma cópia do objeto no formato Bitmap (*.BMP).</p>

TSrvObject(): SaveAsBMP ( ) --> lOk

lOk
    (logico)
  • Retorna verdadeiro (.T.), se a imagem for salva com sucesso; caso contrário, retorna falso (.F.).

 

 

oObject:SaveAsBMP("c:\Dir\Imagem.BMP")

SetColor

<p>Define as cores do objeto.</p>

TSrvObject(): SetColor ( [ nClrFore], [ nClrBack] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nClrForeNuméricoIndica a cor da fonte.  
nClrBackNuméricoIndica a cor de fundo do objeto.  

 

oObject:SetColor(CLR_BLACK,CLR_WHITE)

SetCoors

<p>Define as coordenadas (à esquerda, ao topo, largura e altura) do objeto utilizando a classe TRect.</p>

TSrvObject(): SetCoors ( < oRect> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
oRectObjetoIndica o objeto do tipo TRect é utilizado para definir as coordenadas.X 

 

Para mais informações sobre a parametrização, consulte a documentação da classe TRect.

 

 

 

 

oRect := TRect():New(32,2,100,100)oObject:SetCoors(oRect)

SetCSS

...

Sintaxe

Bloco de código
TSrvObject(): SetCSS ( < cCssText> ) --> Nil

Parâmetros/Elementos

Nome

Tipo

Descrição

Obrigatório

Referência

cCSS

Caracter

Indica o texto com formato CSS para o objeto.

X

 

Retorno

Nil (Nulo)

Observações

O guia de estilo é de propriedade da Qt Company, e pode ser consultado no link: http://qt-project.org/doc/qt-4.8/stylesheet-examples.html.

Para a aplicação do estilo é necessário associar o componente ADVPL ao seu equivalente Qt, conforme tabela abaixo:

Exemplo

Bloco de código
themeEclipse
languagecpp
linenumberstrue
collapsefalse
oButton1 := TButton():New( 002, 002, "Botão 01",oDlg,{|| alert("Botão 01") }, 40,10,,,.F.,.T.,.F.,,.F.,,,.F. )    
oButton1:SetCss("QPushButton:pressed { background-color: qlineargradient(x1: 0, y1: 0, x2: 0, y2: 1, stop: 0 #dadbde, stop: 1 #f6f7fa); }")

Tabela de componentes (DePara). Válida para SmartClient 131227A ou superior.

Componente ADVPL

Equivalente Qt

TButton
SButton
TBrowseButton
TBtnBmp
TBtnBmp2
THButton

QPushButton

TCBrowse
BrGetDDb
MsBrGetDBase
MsSelBr
TSBrowse
TWBrowse
VCBrowse

QTableWidget

TCColumn

QTableWidgetItem

TCheckBox

QCheckBox

TComboBox

QComboBox

TFolder

QTabBar

TGet

QLineEdit

TGrid

QTableView

TGroup

QGroupBox

TListBox

QListWidget

TMeter

QProgressBar

TMsgBar

QStatusBar

TMsgItem

QLabel

TMultiGet

QTextEdit

TPanel

QLabel

TRadMenu

QRadioButton

TSay

QLabel

TScrollArea
TScrollBox

QScrollArea

TSimpleEditor

QTextEdit

TSlider

QSlider

TSpinBox

QSpinBox

TSplitter

QSplitter

TToolBox

QToolBox

TTree

QTreeWidget

 

SetDisable

<p>Habilita ou desabilita o objeto.</p>

TSrvObject(): SetDisable ( < lEnable> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
lEnableLógicoIndica se o habilita (.T.) ou desabilita (.F.) o objeto.X 

 

 

 

oObject:SetDisable(.T.)

SetEnable

<p>Habilita ou desabilita o objeto.</p>

TSrvObject(): SetEnable ( < lEnable> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
lEnableLógicoIndica se o habilita (.T.) ou desabilita (.F.) o objeto.X 

 

oObject:SetEnable(.F.)

SetFocus

<p>Altera o foco da entrada de dados para o objeto.</p>

TSrvObject(): SetFocus ( ) -->

oObject:SetFocus()

SetFont

<p>Define a fonte do objeto.</p>

TSrvObject(): SetFont ( < oFont> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.X 

 

oFont := TFont():New('Courier new',,-16,.T.)oObject:SetFont( oFont )

SetProperty

<p>Permite alterar o valor de qualquer propriedade do objeto.</p>

TSrvObject(): SetProperty ( < cProp>, < xValue> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
cPropCaracterIndica o nome da propriedade do objeto.X 
xValueQualquerIndica o valor que será atribuído à propriedade.X 

 

oObject:SetProperty( "cName", novoValor )

SetText

<p>Define o texto do objeto.</p>

TSrvObject(): SetText ( < cTexto> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
cTextoCaracterIndica o texto do objeto.X 

 

oObject:SetText("texto")

SetUpdatesEnabled

<p>Habilita ou desabilita a atualização do objeto.</p>

TSrvObject(): SetUpdatesEnabled ( [ lEnable] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
lEnableLógicoIndica se habilita (.T.) ou desabilita (.F.) a atualização do objeto.  

 

 

 

Utilize esse método quando um determinado conjunto de operações são necessárias mas a visualização de seus passos não.

Exemplo:

É necessário adicionar 20 itens num objeto do tipo Browse e a visualização da inserção não é relevante ao processo.

// Desabilita a atualizaçãooObject:SetUpdatesEnabled( .F. )for nX := 1 to  20 ... insere// Habilita a atualizaçãooObject:SetUpdatesEnabled( .T. )

 

oObject:SetUpdatesEnabled( .F. )

Show

<p>Torna o objeto visível.</p>

TSrvObject(): Show ( ) -->

oObject:Show()

 

Propriedade

Descrição

Tipo

aControls

Indica o array de objetos criados nesta classe.

Vetor

bGotFocus

Indica o bloco de código que será executado quando o objeto ganha foco.

Bloco de código

bHelp

Indica o bloco de código que será executado ao pressionar F1 quando o foco estiver no objeto.

Bloco de código

bLClicked

Indica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto.

Bloco de código

bLDblClick

Indica o bloco de código que será executado quando clicar duas vezes, com o botão esquerdo do mouse, sobre o objeto.

Bloco de código

bLostFocus

Indica o bloco de código que será executado quando o objeto perde foco.

Bloco de código

bRClicked

Indica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto.

Bloco de código

bValid

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, </tr> <tr> falso (.F.).

Bloco de código

bWhen

Indica 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 </tr> <tr> objeto continua habilitado; caso contrário, falso (.F.).

Bloco de código

cCaption

Indica o título ou conteúdo do objeto.

Caracter

cMsg

Indica a mensagem que será apresentada na barra de status, da janela principal, quando o objeto ganha foco.

Caracter

cName

Indica o nome do objeto.

Caracter

cReadVar

Indica o conteúdo da variável atribuída internamente ao objeto.

Caracter

cTooltip

Indica a mensagem que será apresentada quando o objeto exibir sua dica de contexto (tooltip).

Caracter

lActive

Indica se o objeto está (.T.) ou não (.F.) ativo.

Lógico

lCanGotFocus

Indica se objeto pode (.T.) ou não (.F.) receber foco.

Lógico

lVisible

Indica se o objeto é visível (.T.) ou invisível (.F.).

Lógico

...

...

nBottom

Indica a altura em pixels.

Numérico

nClientHeight

Indica a altura em pixels.

Numérico

nClientWidth

Indica a largura em pixels.

Numérico

nClrPane

Indica a cor de fundo do objeto.

Numérico

nClrText

Indica a cor do texto do objeto.

Numérico

nHeight

Indica a altura em pixels do objeto.

Numérico

nLeft

Indica a coordenada horizontal em pixels.

Numérico

nRight

Indica a largura em pixels.

Numérico

nTop

Indica a coordenada vertical em pixels.

Numérico

nWidth

Indica a largura em pixels do objeto.

Numérico

nWnd

Indica o manipulador (Handle) do objeto.

Numérico

oCargo

Indica o conteúdo associado ao objeto.

Objeto

oCursor

Indica o tipo de ponteiro do mouse.

Objeto

oFont

Indica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.

Objeto

oParent

Indica a janela ou controle visual onde o objeto será criado.

Objeto

oWnd

Indica o objeto do tipo tDialog ou tWindow onde se encontra este objeto.

...

Esta propriedade é utilizada apenas para consulta. Qualquer atribuição feita programaticamente nesta propriedade com um objeto de interface válido é ignorada, e qualquer atribuição de objeto inválido ( não pertencente à hierarquia de tDialog ou tWindow ) vai gerar uma ocorrência de erro fatal Advpl "Invalid class type passed to method or property!".

Objeto

...

 

Esta classe não pode ser instanciada diretamente.

 

 

 

 

 

 

 

 

 

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

...