Array Dinâmico - Veja esse aqui...
24/05/2019
13
Oi pessoal, eu ainda estou com dúvidas sobre array dinâmico do Delphi. Eu fiz a seguinte implemantação:
Tentando ver se com isso eu inutilizo a posição 0 e uso só as posições 1, 2 e 3. Eu consigo compilar o código, mas ele dá pau na execução. Vocês podem me orientar neste caso? Qual a sugestão de vocês para este array? Fico no aguardo, obrigado,
Edisson Sávio.
SETLENGTH(xyn,(imax+1),(jmax+1),3) SETLENGTH(xyn[0],0); SETLENGTH(xyn[1],imax+1); SETLENGTH(xyn[2],jmax+1); SETLENGTH(xyn[3],3), aonde imax e jmax são índices lidos.
Tentando ver se com isso eu inutilizo a posição 0 e uso só as posições 1, 2 e 3. Eu consigo compilar o código, mas ele dá pau na execução. Vocês podem me orientar neste caso? Qual a sugestão de vocês para este array? Fico no aguardo, obrigado,
Edisson Sávio.
Responder
Posts
24/05/2019
Por que afinal você quer "inutilizar" a posição 0? Não é mais fácil simplesmente não lançar valor para a posição 0 e pronto?
Responder
24/05/2019
Por que afinal você quer "inutilizar" a posição 0? Não é mais fácil simplesmente não lançar valor para a posição 0 e pronto?
Eu também acho assim, mas não está funcionando. Veja, eu posso usar o seguinte trecho de comando:
SETLENGTH(xyn,(imax+1),(jmax+1),3); SETLENGTH(xyn[1],imax+1); SETLENGTH(xyn[2],jmax+1); SETLENGTH(xyn[3],3);
FOR i := 1 TO imax DO
FOR j := 1 TO jmax DO
READLN(xyn[i,j,1],xyn[i,j,2]);
E ele dá pau. Você pode me dar uma ajuda? Obrigado, Edisson Sávio.
Responder
Clique aqui para fazer login e interagir na Comunidade :)