Histórico da Página

...

Portuguese

Pagetitle

	TSBrowse
	TSBrowse

Colapse ALL

Expand ALL

Classe: TSBrowse

Cria um objeto do tipo grade.

Hierarquia

TSrvObject -> TControl -> TCBrowse -> TSBrowse

Construtores

New

Método construtor da classe.

Sintaxe

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

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
nRow	Numérico	Indica a coordenada vertical.
nCol	Numérico	Indica a coordenada horizontal.
nWidth	Numérico	Indica a largura em pixels do objeto.
nHeigth	Numérico	Indica a altura em pixels do objeto.
oWnd	Objeto	Indica a janela ou controle visual onde o objeto será criado.
bChange	Bloco de código	Indica o bloco de código que será executado ao mudar de linha.
uParam7	Numérico	Compatibilidade.
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.
nLines	Numérico	Indica o número de linhas por células.

Retorno

oObjeto

(objeto)

Retorna o objeto criado.

Exemplos

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

Exemplos

#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

Preview

Exemplo da classe TSBrowse