Classe: TCColumn
Cria um objeto do tipo coluna para ser utilizada no browse do sistema, como por exemplo: TCBrowse e BrGetDDb.
TClassInstance -> TCColumn
New
Método construtor da classe.
TCColumn(): New ( < cTitulo>, < bData>, [ cPicture], [ uParam4], [ uParam5], [ cAlinhamento], [ nLargura], [ uParam8], [ lEdit], [ uParam10], [ bValid], [ uParam12], [ uParam13], [ uParam14] ) --> Nil
Nome | Tipo | Descrição | Obrigatório | Referência |
cTitulo | Caracter | Indica o título da coluna. | X | |
bData | Bloco de código | Indica o bloco de código que contém o campo da tabela que será apresentado no browse. | X | |
cPicture | Caracter | Indica a picture necessária para edição da coluna. | ||
uParam4 | Qualquer | Compatibilidade. | ||
uParam5 | Qualquer | Compatibilidade. | ||
cAlinhamento | Caracter | Indica o tipo de alinhamento da coluna. Sendo: Left (à esquerda), Center (centralizada) ou Right (à direita). | ||
nLargura | Numérico | Indica a largura da coluna. | ||
uParam8 | Qualquer | Indica se, verdadeiro (.T.), a coluna é uma imagem; caso contrário, falso (.F.) (conteúdo padrão). | ||
lEdit | Lógico | Compatibilidade. | ||
uParam10 | Qualquer | 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.). | ||
uParam12 | Qualquer | Compatibilidade. | ||
uParam13 | Qualquer | Compatibilidade. | ||
uParam14 | Qualquer | Compatibilidade. |
oBrowse:AddColumn(TCColumn():New("Codigo",{||SA1->A1_COD },"@!",,,"LEFT",,.F.,.F.,,,,,))
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