Pagetitle |
---|
| VCBrowse obsoleto |
---|
| VCBrowse obsoleto |
---|
|
Classe: VCBrowse (obsoleto)Cria um objeto do tipo grade. NewMétodo construtor da classe.VCBrowse (obsoleto)(): New ( [ nRow], [ nCol], [ nWidth], [ nHeight], [ bLine], [ aHeaders], [ aColSizes], [ oWnd], [ cField], [ uValue1], [ uValue2], [ bChange], [ bLDblClick], [ bRClick], [ oFont], [ oCursor], [ nClrFore], [ nClrBack], [ cMsg], [ uParam20], [ cAlias], [ lPixel], [ bWhen], [ uParam24], [ bValid], [ lHScroll], [ lVScroll] ) --> 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. |
|
| bLine | Bloco de código | Indica o bloco de código da lista de campos |
|
| aHeaders | Array of Record | Indica o título dos campos no cabeçalho. |
|
| aColSizes | Array of Record | Indica a largura das colunas. |
|
| oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. |
|
| cField | Caracter | Indica os campos necessários para o filtro. |
|
| uValue1 | Qualquer | Indica o início do intervalo para o filtro. |
|
| uValue2 | Qualquer | Indica o fim do intervalo para o filtro. |
|
| 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). |
|
| 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, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.) se o controle permanecer habilitado; caso contrário, retornará 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.). |
|
| lHScroll | Lógico | Indica se habilita(.T)/desabilita (.F.) a barra de rolagem horizontal. |
|
| lVScroll | Lógico | Indica se habilita(.T.)/desabilita(.F.) a barra de rolagem vertical. |
|
|
oObjeto(objeto)- Retorna o objeto criado.
oBrowse := VCBrowse():New( 01,01,260,184,,; {'','Codigo','Descrição'},{20,30,30}, oDlg, ,,,,; {||},,,,,,,.F.,,.T.,,.F.,,, ) #include "TOTVS.CH" User Function VCBrowse() Local oOK := LoadBitmap(GetResources(),'br_verde') Local oNO := LoadBitmap(GetResources(),'br_vermelho') DEFINE DIALOG oDlg TITLE "Exemplo VCBrowse" FROM 180,180 TO 550,700 PIXEL
oBrowse := VCBrowse():New( 01,01,260,184,,; {'','Codigo','Descrição'},{20,30,30}, oDlg, ,,,,; {||},,,,,,,.F.,,.T.,,.F.,,, ) aBrowse := {{.T.,'CLIENTE 001','RUA CLIENTE 001','BAIRRO CLIENTE 001'},; {.F.,'CLIENTE 002','RUA CLIENTE 002','BAIRRO CLIENTE 002'},; {.T.,'CLIENTE 003','RUA CLIENTE 003','BAIRRO CLIENTE 003'} } oBrowse:SetArray(aBrowse) oBrowse:bLine := {||{If(aBrowse[oBrowse:nAt,01],oOK,oNO),; aBrowse[oBrowse:nAt,02],; aBrowse[oBrowse:nAt,03],; aBrowse[oBrowse:nAt,04] } } // Troca a imagem no duplo click do mouse oBrowse:bLDblClick:={|| aBrowse[oBrowse:nAt][1] := !aBrowse[oBrowse:nAt][1],; oBrowse:DrawSelect()}
ACTIVATE DIALOG oDlg CENTERED Return Exemplo da classe VCBrowseImage Modified Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
|