Camoloze, Vi suas mensagens na lista e resolvi fazer alguns testes primarios. Vê só, fiz o exemplo do for e nao aconteceu erro nenhum, vc ja tentou rodar em outro computador?. Pega os arquivos textos que tem os registros e tenta rodar a aplicacao de importacao em outra maquina, veja que estou rodando esse exemplo do for em um notebook de 512mb e 40de hd, nem acesso a disco ele esta fazendo, deve ser alguma coisa com a maquina, pois aqui esta tudo certo.
Qualquer coisa eh só falar Leonardo Anselmo Leonardo Anselmo Diretor Comercial [EMAIL PROTECTED] Tel.: (87) 3761-4950 | Cel:(87) 9993-1184 Imprima somente se necessário. A natureza agradece. Este e-mail contêm informações que podem ser privilegiadas e confidenciais. Se você não é o destinatário, por favor apague a mensagem e comunique-nos o fato imediatamente. ----- Original Message ----- From: Camoloze To: delphi-br@yahoogrupos.com.br Sent: Monday, December 10, 2007 1:09 PM Subject: RES: [delphi-br] Importar arquivo txt Ai que esta a questão, não consigo percorrer o arquivo para por exemplo gravar 10 arquivos com 5.000.000 de registros. Mesmo se faço assim : For i = 1 to 10000000 do Begin IF i = 5.000.000 Then ShowMessage( 'registro numero 5.000.000' ); End Também acontece o erro de out of memory. Já tentei no Delphi 7 e acontece o mesmo. Att. Roberto De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Ismair Alves Enviada em: segunda-feira, 10 de dezembro de 2007 12:48 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Importar arquivo txt Oi, Voce pode quebrar esse arquivo em partes menores, essa e uma solucao. Uma pergunta, voce esta dando commit de qtos em qtos registro? Att Em 10/12/07, Camoloze <HYPERLINK "mailto:camoloze%40imatec.com.br"[EMAIL PROTECTED]> escreveu: > > Preciso importar um arquivinho txt para uma de nossa base de dados ( > Firebird, Sql-Server... ). > > Só que o da o danado tem 3.86 gbytes ( +/- 50.000.000 de registros ). > > Quando começo a conversão, AssignFile( Variavel, NomeDoTxt ) , vai tudo > bem > até +/- 4.000.000 de registros, ai da erro "out of memory". > > Estou utilizando Delphi2007 Update 3. Pentium Core 2 Duo, 2 giga de RAM. > > Alguém conhece alguma ferramenta onde eu poderia dividir este monstro, e > trabalhar o arquivo em partes? > > Any clue Andreano? > > []´s > > Roberto Camoloze > > No virus found in this outgoing message. > Checked by AVG Free Edition. > Version: 7.5.503 / Virus Database: 269.16.17/1179 - Release Date: > 09/12/2007 > 11:06 > > > [As partes desta mensagem que não continham texto foram removidas] > > > -- Ismair C. Alves msn: HYPERLINK "mailto:ismair_alves%40hotmail.com"[EMAIL PROTECTED] ByteConf Soluções em Software Livre. Linux User: #447538 [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.16.17/1179 - Release Date: 09/12/2007 11:06 No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.16.17/1179 - Release Date: 09/12/2007 11:06 [As partes desta mensagem que não continham texto foram removidas] __________ Informação do NOD32 IMON 2713 (20071210) __________ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]