Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle | ||||
---|---|---|---|---|
|
Função: ASize
Aumenta ou diminui um array a um tamanho especificado
...
Sintaxe
Bloco de código | ||
---|---|---|
| ||
ASize( <aDestino> aDestino >, <nTamanho> ) --> Nil nTamanho > )
|
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
aDestino |
...
vetor | Indica o array que terá o tamanho manipulado. | X |
|
nTamanho |
...
numérico | Indica o novo tamanho do array. | X |
|
...
Retorno
Nome | Tipo | Descrição |
---|---|---|
uRet | nil | Retorna Nulo (nil) |
Exemplos
Nil (Nulo)
...
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#DEFINE CRLF Chr(13)+Chr(10) User Function Exemplo() Local aExemplo := {1, 2, 3, 4} Local cMensagem := "" //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função ASize | //+----------------------------------------------------------------------------+ cMensagem += "Tamanho inicial = " + cValToChar(Len(aExemplo)) + CRLF ASize(aExemplo, 5) cMensagem += "Redimensionado = " + cValToChar(Len(aExemplo)) + CRLF cMensagem += "aExemplo[1] = " + cValToChar(aExemplo[1]) + CRLF cMensagem += "aExemplo[2] = " + cValToChar(aExemplo[2]) + CRLF cMensagem += "aExemplo[3] = " + cValToChar(aExemplo[3]) + CRLF cMensagem += "aExemplo[4] = " + cValToChar(aExemplo[4]) + CRLF cMensagem += "aExemplo[5] = " + cValToChar(aExemplo[5]) + CRLF ASize(aExemplo, 2) cMensagem += "Redimensionado = " + cValToChar(Len(aExemplo)) + CRLF cMensagem += "aExemplo[1] = " + cValToChar(aExemplo[1]) + CRLF cMensagem += "aExemplo[2] = " + cValToChar(aExemplo[2]) //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ MsgInfo(cMensagem, "Exemplo do ASize") Return Exemplo da função ASize
|
Abrangência
Microsiga Protheus 8.11 , Protheus 10
Veja
...
também
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas