Histórico da Página

...

Portuguese

Pagetitle

	AFill
	AFill

Colapse ALL

Expand ALL

Função: AFill

Preenche

um

array

com

um

único

valor

de

qualquer

tipo

de

dados

(inclusive

array´s,

blocos

de

código

ou

nulo)

na

faixa

especificada.

Sintaxe

AFill ( < aDestino>, < ValorExp>, [ nInicio], [ nCont] ) --> Nil

Parâmetros/Elementos

Nome	Tipo	Descrição	Obrigatório	Referência
aDestino	Vetor	Indica o array que será preenchido.	X
ValorExp	Numérico	Indica o valor que será alocado em cada elemento do array. O conteúdo desse parâmetro, pode ser uma expressão de qualquer tipo de dado válido.	X
nInicio	Numérico	Indica a posição do primeiro elemento que será preenchido. Caso o parâmetro fique em branco, o valor padrão será um (1).
nCont	Numérico	Indica a quantidade de elementos que serão preenchidos começando com o elemento do parâmetro . Caso esse parâmetro não seja informado, os elementos são preenchidos a partir da posição do elemento inicial até o final do array.

Retorno

Nil (Nulo)

Observações

Exemplos

#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
Local aExemplo := {}
Local cMensagem := ""
//+----------------------------------------------------------------------------+
//|Exemplifica o uso da função AFill                                           |
//+----------------------------------------------------------------------------+
  ASize(aExemplo, 5)
  AFill(aExemplo, "X")
  AFill(aExemplo, "Y", 2, 3)
  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])
//+----------------------------------------------------------------------------+
//|Apresenta uma mensagem com os resultados obtidos                            |
//+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do AFill")