Você está aqui: Delphi ::: Dicas & Truques ::: Arrays e Matrix (Vetores e Matrizes) |
Como passar uma matriz de Integer para uma procedure ou functionQuantidade de visualizações: 12112 vezes |
Em algumas situações precisamos passar uma matriz para uma procedure ou function (função). Nesta dica eu mostro como isso pode ser feito. Veja que a procedure exibirMatriz(matriz: array of Integer) possui uma matriz aberta (open array) como parâmetro. Esta é a forma correta de declarar matrizes em parâmetros de métodos, pois permite que passemos matrizes de tamanhos arbitrários. Veja o código:procedure TForm3.exibirMatriz(matriz: array of Integer); var i: Integer; begin for i := Low(matriz) to High(matriz) do begin Memo1.Lines.Add(IntToStr(matriz[i])); end; end; procedure TForm3.Button1Click(Sender: TObject); var // vamos declarar uma matriz de 10 inteiros valores: array[1..10] of Integer; No evento Click do botão nós criamos uma matriz de 10 inteiros, inicializamos os valores dos elementos e a fornecemos à procedure exibirMatriz() para que esta exiba os valores em um TMemo. Importante: Quando passamos uma matriz para uma função ou procedure, alterações nos valores dos elementos da matriz por parte da procedure ou função que a recebe não afetam a matriz original. Para que isso aconteça devemos usar a palavra-chave Var antes do parâmetro para indicar que estamos passando a matriz por referência. Veja: procedure TForm3.exibirMatriz(var matriz: array of Integer); |
![]() |
Desafios, Exercícios e Algoritmos Resolvidos de Delphi |
Veja mais Dicas e truques de Delphi |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
1º lugar: Java |