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
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. | ||
nHeight | Numérico | Indica a altura em pixels do objeto. | ||
uParam5 | Bloco de código | Compatibilidade. | ||
uParam6 | Array of Record | Compatibilidade. | ||
uParam7 | Array of Record | Compatibilidade. | ||
oWnd | Objeto | Indica o controle visual onde o divisor será criado. | ||
cField | Caracter | Indica os campos necessários para o filtro. | ||
uParam10 | Qualquer | Compatibilidade. | ||
uParam11 | Qualquer | Compatibilidade. | ||
bChange | Bloco de código | Indica o bloco de código que será executado quando o estado ou conteúdo do objeto é modificado pela ação sobre o controle visual. | ||
bLDblClick | Bloco de código | Indica o bloco de código que será executado quando clicar duas vezes, com o botão esquerdo do mouse, sobre o objeto. | ||
bRClick | Bloco de código | Indica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto. | ||
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. | ||
oCursor | Objeto | Indica o tipo de ponteiro do mouse. | ||
nClrFore | Numérico | Indica a cor do texto da janela. | ||
nClrBack | Numérico | Indica a cor de fundo da janela. | ||
cMsg | Caracter | Indica a mensagem ao posicionar o ponteiro do mouse sobre o objeto. | ||
uParam20 | Lógico | Compatibilidade. | ||
cAlias | Caracter | Indica se o objeto é utilizado com array (opcional) ou tabela (obrigatório) | X | |
lPixel | Lógico | Indica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.). | ||
bWhen | Bloco de código | 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 objeto continua habilitado; caso contrário, falso (.F.). | ||
uParam24 | Lógico | Compatibilidade. | ||
bValid | Bloco de código | 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, 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()
Propriedade | Descrição | Tipo |
bAllMark | Indica 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 |
lAllMark | Indica se habilita(.T.)/desabilita(.F.) o status de marca dos registros do browse. | Lógico |
lCanAllMark | Indica se habilita(.T.)/desabilita(.F.) a opção de marcar todos os registros do browse. | Lógico |
lHasMark | Indica 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
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas