4D Doc Center : LISTBOX DUPLICATE COLUMN

4D v14.3

LISTBOX DUPLICATE COLUMN


LISTBOX DUPLICATE COLUMN ( {* ;} objeto ; posCol ; nomCol ; varCol ; nomCabe ; varCabe {; nomRodape ; varRodape} )

Parâmetro	Tipo	Descrição
*	Operador	Se especificado, objeto é um nome de objeto (cadeia) Se omitido, objeto é um campo ou uma variável
objeto	Objeto de formulário	Nome de objeto (se * for especificado) ou Campo ou variável (se * for omitido)
posCol	Inteiro longo	Localização da nova coluna duplicada
nomCol	cadeia	Nome da nova coluna
varCol	Array, Campo, Variável	Nome da variável array da coluna ou campo ou variável
nomCabe	cadeia	Nome do objeto do cabeçalho da coluna
varCabe	Variável inteira	Variável do cabeçalho da coluna
nomRodape	cadeia	Nome do objeto do rodapé da coluna
varRodape	Variável	Variável do rodapé da coluna

Descrição

O comando LISTBOX DUPLICATE COLUMN duplica a coluna definida pelos parâmetros objeto e * por programação no contexto do formulário executado (Modo Aplicação). O formulário original, gerado em modo Desenho não se modifica.

Nota: esta funcionalidade já se encontra em 4D, em modo Desenho unicamente, com o comando Duplicar Coluna do menu contextual do editor de formulários.

De forma pré determinada, todas as opções de estilo (tamanho, cor, formatos, etc) definidos para a coluna fonte por meio da lista de propriedades ou mediante os comandos de gestão de objetos (SET COLOR, etc.) se aplicam a cópia. O método objeto e a configuração dos eventos formulário também se duplicam.
No entanto, a fonte de dados (array ou seleção, em função do tipo de fonte definido para o list box), assim como os arrays de estilo e de cores não se duplicam. É sua responsabilidade definir eles para cada nova coluna depois da duplicação.

Os parâmetros objeto e * designam a coluna a duplicar. Se passar o parâmetro opcional * indica que o parâmetro objeto é um nome de coluna (cadeia). Se não passar este parâmetro, indica que o parâmetro objeto é uma variável de coluna. Neste caso, passou uma referência de variável no lugar de uma cadeia.

Nota: este comando não faz nada quando se aplica a primeira coluna de um list box que se mostra no modo hierárquico.

A nova coluna duplicada aparece justo antes da coluna designada pelo parâmetro posCol. Se o parâmetro posCol é maior que o número total de colunas, a continuação, a coluna duplicada se coloca depois da última coluna.

Nos parâmetros nomCol e varCol, passe o nome do objeto e da variável da nova coluna duplicada.

Para list boxes de tipo array, o nome da variável corresponde ao nome do array cujo conteúdo é mostrado na coluna.
Para list boxes de tipo seleção, pode passar um campo ou uma variável no parâmetro varCol. Assim que o conteúdo da coluna será o valor do campo ou da variável, avaliada para cada registro da seleção associada ao list box. Este tipo de conteúdo só pode utilizado quando a propriedade "Fonte de dados" do list box é Seleção atual ou Seleção temporal.

Lembre que a fonte de dados da coluna original não se duplica: deve estabelecer uma variável, array ou campo fonte da nova coluna duplicada.

Nos parâmetros nomCabe e varCabe, passe o nome do objeto e a variável do cabeçalho da nova coluna duplicada. Também pode passar o nome do objeto e a variável do rodapé da coluna inserida nos parâmetros nomRodape e varRodape. Se omitido o parâmetro varRodape, 4D utiliza uma variável dinâmica.

Nota: os nomes de objetos devem ser únicos em um formulário. Deve ter certeza de que os nomes passados em nomCol, nomCabe e nomRodape não tenham sido utilizados. Caso contrário, a coluna não se duplica e é gerado um erro.

Este comando deve ser utilizado no contexto de mostrar um formulário. É chamado geralmente no evento de formulário On Load ou depois de uma ação usuário (evento On Clicked).

Exemplo

Em um list box de tipo array, queremos duplicar a coluna "Nome", lista para a entrada:

Aqui está o código do botão:

 ARRAY TEXT(arrFirstNames2;Records in table([Members]))

 LISTBOX DUPLICATE COLUMN(*;"column2";3;"col2bis";arrFirstNames2;"FirstNameA";vHead2A)

 OBJECT SET TITLE(*;"FirstNameA";"Middle Name")

 EDIT ITEM(*;"col2A";0)

Ao fazer clique no botão, aparece o list box assim: