Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 4 Atual »

Classe: MsSelBr

Cria um objeto do tipo grade.

TSrvObject -> TControl -> TCBrowse -> MsSelBr


New

Método construtor da classe.


MsSelBr(): New ( [ nRow], [ nCol], [ nWidth], [ nHeight], [ uParam5], [ uParam6], [ uParam7], [ oWnd], [ cField], [ uParam10], [ uParam11], [ bChange], [ bLDblClick], [ bRClick], [ oFont], [ oCursor], [ nClrFore], [ nClrBack], [ cMsg], [ uParam20], < cAlias>, [ lPixel], [ bWhen], [ uParam24], [ bValid] ) --> oObjeto


 

NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical.  
nColNuméricoIndica a coordenada horizontal.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
uParam5Bloco de códigoCompatibilidade.  
uParam6Array of RecordCompatibilidade.  
uParam7Array of RecordCompatibilidade.  
oWndObjetoIndica o controle visual onde o divisor será criado.  
cFieldCaracterIndica os campos necessários para o filtro.  
uParam10QualquerCompatibilidade.  
uParam11QualquerCompatibilidade.  
bChangeBloco de códigoIndica o bloco de código que será executado quando o estado ou conteúdo do objeto é modificado pela ação sobre o controle visual.  
bLDblClickBloco de códigoIndica o bloco de código que será executado quando clicar duas vezes, com o botão esquerdo do mouse, sobre o objeto.  
bRClickBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto.  
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.  
oCursorObjetoIndica o tipo de ponteiro do mouse.  
nClrForeNuméricoIndica a cor do texto da janela.  
nClrBackNuméricoIndica a cor de fundo da janela.  
cMsgCaracterIndica a mensagem ao posicionar o ponteiro do mouse sobre o objeto.  
uParam20LógicoCompatibilidade.  
cAliasCaracterIndica se o objeto é utilizado com array (opcional) ou tabela (obrigatório)X 
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
bWhenBloco de códigoIndica 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 objeto continua habilitado; caso contrário, falso (.F.).  
uParam24LógicoCompatibilidade.  
bValidBloco de códigoIndica 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.).  

 

oObjeto
    (objeto)
  • Retorna o objeto criado.

 

 

 

 

 


oBrowse := MsSelBr():New( 1,1,260,184,,,,oDlg,,,,,,,,,,,,.F.,'SA1',.T.,,.F.,,, )

AllMark

Inverte o status, usando como base o valor da propriedade <lAllMark> de todos os itens do browse.


MsSelBr(): AllMark ( ) -->


 

 

 

 

 

 

 

 


oBrowse:AllMark()

 

PropriedadeDescriçãoTipo
bAllMarkIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, no cabeçalho do browse.Bloco de código
lAllMarkIndica se habilita(.T.)/desabilita(.F.) o status de marca dos registros do browse.Lógico
lCanAllMarkIndica se habilita(.T.)/desabilita(.F.) a opção de marcar todos os registros do browse.Lógico
lHasMarkIndica se executa o bloco de código configurado na propriedade bAllMark. Caso esta propriedade não seja configurada, o método AllMark() será executado.Lógico

 


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

DbSelectArea('SA1')
oBrowse := MsSelBr():New( 1,1,260,184,,,,oDlg,,,,,,,,,,,,.F.,'SA1',.T.,,.F.,,, )
oBrowse:AddColumn(TCColumn():New('Codigo',{||SA1->A1_COD },,,,'LEFT',,.F.,.F.,,,,.F.,))
oBrowse:AddColumn(TCColumn():New('Loja' ,{||SA1->A1_LOJA},,,,'LEFT',,.F.,.F.,,,,.F.,))
oBrowse:AddColumn(TCColumn():New('Nome' ,{||SA1->A1_NOME},,,,'LEFT',,.F.,.F.,,,,.F.,))
oBrowse:lHasMark := .T. oBrowse:bAllMark := {|| alert('Click no header da browse') }

ACTIVATE DIALOG oDlg CENTERED Return

Exemplo da classe MsSelBr

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

 

  • Sem rótulos