Classe: TCColumn
Cria um objeto do tipo coluna para ser utilizada no browse do sistema, como por exemplo: TCBrowse e BrGetDDb.
TClassInstance -> TCColumn
Propriedade | Descrição | Tipo |
bData | Indica o bloco de código que contém o campo da tabela que será apresentado no browse. | Bloco de código |
bValid | 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.). | Bloco de código |
cHeading | Indica o título da coluna. | Caracter |
cPicture | Indica a picture necessária para edição da coluna. | Caracter |
lEdit | Indica se habilita(.T.)/desabilita(.F.) a edição da célula. | Lógico |
Para informações sobre utilização de browse, consulta a documentação da classe TCBrowse.
#include "TOTVS.CH"User Function TCColumn() DEFINE DIALOG oDlg TITLE "Exemplo TCColumn" FROM 180,180 TO 550,700 PIXEL // Cria browse que receberá as colunas DbSelectArea("SA1") oBrowse:=BrGetDDB():New(1,1,260,184,,,,oDlg,,,,,,,,,,,,.F.,"SA1",.T.,,.F.,,,) // Cria colunas oBrowse:AddColumn(TCColumn():New("Codigo",{||SA1->A1_COD },,,,"LEFT",,.F.,.F.,,,,,)) oBrowse:AddColumn(TCColumn():New("Loja" ,{||SA1->A1_LOJA},,,,"LEFT",,.F.,.F.,,,,,)) oBrowse:AddColumn(TCColumn():New("Nome" ,{||SA1->A1_NOME},,,,"LEFT",,.F.,.F.,,,,,)) ACTIVATE DIALOG oDlg CENTERED Return
Exemplo da classe TCColumn
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