Gravar em um arquivo um array dinamico
Awe pessoal fmz?
Gostaria de saber como eu posso gravar em um arquivo e ler um arquivo que seje um array dinamico??
Assim :
TMapa = record
tile: array of array of integer;
end;
Faria assim se nao fosse dinamico:
Mais sendo como posso estar fazendo?
Gostaria de saber como eu posso gravar em um arquivo e ler um arquivo que seje um array dinamico??
Assim :
TMapa = record
tile: array of array of integer;
end;
Faria assim se nao fosse dinamico:
var Arquivo: File of Tmapa; begin if SaveDialog1.Execute then begin AssignFile(arquivo, Savedialog1.FileName); ReWrite(arquivo); Write(arquivo, Mapa); CloseFile(arquivo); end;
Mais sendo como posso estar fazendo?
Snipa
Curtidas 0
Respostas
Edilcimar
05/02/2006
dê uma olhada aqui
http://forum.clubedelphi.net/viewtopic.php?t=73483
estamos tratando de um problema onde usamos array dinâmico
http://forum.clubedelphi.net/viewtopic.php?t=73483
estamos tratando de um problema onde usamos array dinâmico
GOSTEI 0
Snipa
05/02/2006
Bom vlw mais nao ajudo em nada.
Oque quero saber é como gravar um array dinamico em um arquivo no computador.
Eu poderia fazer uma funcao pra ler e gravar num txt, mais queria saber se tem algum modo mais facil, melhor, estilo ao que coloquei acima.
Oque quero saber é como gravar um array dinamico em um arquivo no computador.
Eu poderia fazer uma funcao pra ler e gravar num txt, mais queria saber se tem algum modo mais facil, melhor, estilo ao que coloquei acima.
GOSTEI 0
Edilcimar
05/02/2006
Arquivo : TextFile;
AssignFile(Arquivo,C:\Diretorio\MeuArquivo.txt);
Rewrite(Arquivo);
for I := 0 to High(Matriz) do
begin
WriteLn(Arquivo, Matriz[I]);
mais alguma coisa que queira fazer
end;
CloseFile(Arquivo);
Pronto, assim vc grava um arquivo texto usando uma matriz
AssignFile(Arquivo,C:\Diretorio\MeuArquivo.txt);
Rewrite(Arquivo);
for I := 0 to High(Matriz) do
begin
WriteLn(Arquivo, Matriz[I]);
mais alguma coisa que queira fazer
end;
CloseFile(Arquivo);
Pronto, assim vc grava um arquivo texto usando uma matriz
GOSTEI 0
Snipa
05/02/2006
Blz vlw consegui aqui.
GOSTEI 0