Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
TSBrowse
TSBrowse

Classe: TSBrowse

Cria um objeto do tipo grade.

TSrvObject -> TControl -> TCBrowse -> TSBrowse


New

Método construtor da classe.


TSBrowse(): New ( [ nRow], [ nCol], [ nWidth], [ nHeigth], [ oWnd], [ bChange], [ uParam7], [ oFont], [ nLines] ) --> oObjeto


 

NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical.  
nColNuméricoIndica a coordenada horizontal.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeigthNuméricoIndica a altura em pixels do objeto.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
bChangeBloco de códigoIndica o bloco de código que será executado ao mudar de linha.  
uParam7NuméricoCompatibilidade.  
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.  
nLinesNuméricoIndica o número de linhas por células.  

 

oObjeto
    (objeto)
  • Retorna o objeto criado.

oBrowse := TSBrowse():New(01,01,260,170,oDlg,,16,,5)

#include 'TOTVS.CH'
User Function tSBrowse()
DEFINE DIALOG oDlg TITLE "Exemplo TSBrowse" FROM 180,180 TO 550,700 PIXEL

aBrowse := {{'CLIENTE 001','RUA CLIENTE 001','BAIRRO CLIENTE 001'},;
{'CLIENTE 002','RUA CLIENTE 002','BAIRRO CLIENTE 002'},;
{'CLIENTE 003','RUA CLIENTE 003','BAIRRO CLIENTE 003'} }

oBrowse := TSBrowse():New(01,01,260,184,oDlg,,16,,5)
oBrowse:AddColumn( TCColumn():New('Nome',,,{|| },{|| }) )
oBrowse:AddColumn( TCColumn():New('Endereço',,,{|| },{|| }) )
oBrowse:AddColumn( TCColumn():New('Bairro',,,{|| },{|| }) )
oBrowse:SetArray(aBrowse)

ACTIVATE DIALOG oDlg CENTERED
Return

Exemplo da classe TSBrowse

Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server