Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 21-07-2006
manolop manolop is offline
Miembro
 
Registrado: may 2005
Posts: 109
Poder: 19
manolop Va por buen camino
como leer n caracteres de un archivo

Hola a todos, tengo un archivo de texto que es muy muy grande (del orden de 800 MB) y necesito leer bloques de 700 bytes. Estoy probando este codigo, pero no me sirve pq no puedo limitar la informacion que leo:

var
fich:TextFile;
cad:ansistring;
begin
// database1.Commit;
try
try
AssignFile(fich,'fichero.txt');
reset(fich);
while not eof(fich) do
begin
readln(fich,cad);
memo1.Text:=memo1.Text+cad; //esto es solo para ver el resultado
end;
finally
closeFile(fich);
end;
except
on E:Exception do
showmessage('Error de acceso al fichero con msg: '+E.Message);
end;

Por favor, si alguien sabe como deberia leer el archivo, les estaria muy agradecido. Muchas gracias.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como leer un archivo del cual no se el tipo ? ilichhernandez Varios 4 04-07-2006 11:02:18
Como leer un archivo de texto por codigo Shidalis Varios 2 03-09-2005 06:54:34
Como puedo leer un archivo de variable... vicvil Varios 4 10-08-2005 23:31:02
Como leer un archivo TXT dentro de una Página AGAG4 Internet 1 31-08-2004 04:19:45
Leer Archivo .Q43 de Posición Fija es como un Txt FNADALO Varios 1 25-05-2004 18:15:27


La franja horaria es GMT +2. Ahora son las 23:26:30.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi