4D View v16PV ARRAY TO CELLS |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D View v16
PV ARRAY TO CELLS
|
PV ARRAY TO CELLS ( area ; endereço ; coluna ; linha ; conversao ; array ) | ||||||||
Parâmetro | Tipo | Descrição | ||||||
area | Inteiro longo |
![]() |
Área 4D View | |||||
endereço | Inteiro |
![]() |
0 = Linha; 1 = Coluna | |||||
coluna | Inteiro longo |
![]() |
Número da coluna de início | |||||
linha | Inteiro longo |
![]() |
Número da linha de início | |||||
conversao | Inteiro |
![]() |
0 = Tipo texto; 1 = Tipo original | |||||
array | Array |
![]() |
Nome do array | |||||
O comando PV ARRAY TO CELLS insere em area o conteúdo dos arrays cujos nomes se especificam em array. O conteúdo se insere a partir das coordenadas definidas por linha e coluna, no sentido definido por endereço.
Nota: O uso do parâmetro endereço é diferente do parâmetro endereço nos comandos PV GOTO NEXT CELL e PV GET NEXT FREE CELL, onde o endereço pode ser em qualquer sentido. Para PV ARRAY TO CELLS, o endereço é para a direita (0=linha), ou para a parte inferior (1=coluna).
O quinto parâmetro, conversao, permite mudar o tipo dos dados das células que terminarão como texto. O tipo de valor fonte deve ser compatível com esta operação: se solicita uma mudança de tipo de dados de um BLOB ou de uma imagem a texto, conversao será ignorada.
Copiamos novamente, para baixo, três arrays de tipos diferentes a partir da célula atual. Dependendo da resposta ao diálogo de confirmação da mudança de tipo, o conteúdo do array pode ser executado em células 4D View em forma convertida (texto) ou não.
C_INTEGER($Index) `Índice do laço
C_LONGINT($Column;$Row) `Coordenadas da célula de inicio
C_INTEGER($Conversion) `Forçar a conversão a texto?
ARRAY STRING($ArrayString;10) `Array de valores alfanuméricos (começa na célula atual)
ARRAY DATE($ArrayDates;10) `Array de datas (coluna seguinte)
ARRAY BOOLEAN($ArrayBooleans;10) `Array de booleanos (terceira coluna)
`Inicialização
For($Index;1;Size of array($ArrayString))
$ArrayString{$Index}:=String($Index*10) `"10", "20", "30"...
$ArrayDates{$Index}:=Current date(*)+$Index `25/06/2001, 26/06/2001...
$ArrayBooleans{$Index}:=($Index%2=0) `True = par
End for
PV GET CURRENT CELL(Area;$Column;$Row)
CONFIRM("Quer converter o conteúdo dos arrays a texto?")
$Conversion:=1-OK
`Para obter as colunas "$ArrayString", "$ArrayDates" y "$ArrayBooleans":
PV ARRAY TO CELLS(Area;1;$Column;$Row;$Conversion;$ArrayString) `1 = para baixo
PV ARRAY TO CELLS(Area;1;$Column+1;$Row;$Conversion;$ArrayDates)
PV ARRAY TO CELLS(Area;1;$Column+2;$Row;$Conversion;$ArrayBooleans)
Produto: 4D View
Tema: PV Valor célula
Número
15910
Criado por: 4D View 6.8
4D View Linguagem ( 4D View v16)