Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Go Back   Foros Club Delphi > Principal > OOP
Register FAQ Members List Calendar Guía de estilo Today's Posts

Coloboración Paypal con ClubDelphi

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 21/11/2005
ber ber is offline
Miembro
 
Join Date: Nov 2005
Posts: 12
Poder: 0
ber Va por buen camino
Question capacidad del componente Memo

hola a todos, alguien sabe la capacidad que tiene el componente Memo, lo que pasa es que quiero leer un archivo .txt pero este tiene un peso aprox de 2 Mb, me marca un error y no se si es por eso o porque. Les agradesco el sacarme de esta duda.

Salu2
Reply With Quote
  #2  
Old 21/11/2005
dec's Avatar
dec dec is offline
Moderador
 
Join Date: Dec 2004
Location: Alcobendas, Madrid, España
Posts: 13,142
Poder: 36
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Si no dices el error que "te saca"... en fin. Yo creo que el Memo no tiene un "límite" más allá de las características de la memoria RAM del sistema del usuario. En todo caso, ya digo... ¡a ver si dices qué error te encuentras!
__________________
David Esperalta
www.decsoftutils.com
Reply With Quote
  #3  
Old 21/11/2005
ber ber is offline
Miembro
 
Join Date: Nov 2005
Posts: 12
Poder: 0
ber Va por buen camino
Post

Antes que nada gracias por molestarte en contestar la pregunta, el error que sale al mmomemnto de leer el archivo es el siguiente "Proyect Proyect.exe raised exception class ElnOutError with message 'Invalid numeric input'. Process stoped. Use step or Run to continue" bueno creo que en si, el error me lo da porque el archivo que quiero leer son numeros, pero no estoyy seguro por eso pregunto. nuevamente gracias.

Saludos cordiales
Reply With Quote
  #4  
Old 21/11/2005
dec's Avatar
dec dec is offline
Moderador
 
Join Date: Dec 2004
Location: Alcobendas, Madrid, España
Posts: 13,142
Poder: 36
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

La verdad que a mí tampoco me queda muy claro el problema. Posiblemente sea porque desconozca el contexto de lo que estás tratando de llevar a cabo. En la ayuda de Delphi, si buscas la cadena "Invalid numeric input" verás que te aparecen dos resultados. En uno de ellos, concretamente, en "I/O errors" puede leerse lo siguiente, que habría que tener en cuenta, acaso:


Quote:
Originally Posted by Ayuda de Delphi
In Delphi, I/O errors cause an exception to be thrown if the particular statement was compiled in the {$I+} state with I/O checking on. (If the application does not include the SysUtils unit, the exception causes the application to terminate). In the {$I-} state, the program continues to execute, and the error is reported by the IOResult function.
Pero, lo que me llama más la atención es la descripción del propio error de que estamos hablando:


Quote:
Originally Posted by Ayuda de Delphi
Invalid numeric format

Reported by Read or Readln if a numeric value read from a text file does not conform to the proper numeric format.
O sea, que no entiendo muy bien qué está ocurriendo, pero, me da en la nariz que si haces uso de las clases "TStrings" o "TFileStream" no tendrás el problema que ahora tienes. No sé... no estoy seguro... podrías probar a ver. Tampoco estaría demás que copiaras aquí algo del código fuente del contexto en que se produce el error, es decir, por ejemplo, estás cargando el contenido del archivo, pero, ¿qué haces con el mismo? ¿Lo asignas a alguna variable? ¿Lo...? Un poco de código puede ayudar.

Por mi parte estaba a punto de terminar este "ejemplo" de uso de la clase "TStrings" para lo que te es menester. Échale un vistazo, por si te sirve de algo. En cualquier caso, creo que, el error que te aparece no tiene que ver con la capacidad del "Memo", sino que tiene que ver con otro problema. Y, hablando del Memo... si lo que quieres es cargar el archivo en el "TMemo", directamente, puesto que este cuenta con una propiedad "Lines" de tipo "TStrings", precisamente, podrías emplear su método "LoadFromFile", como he dicho más arriba.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
resourcestring
  rsLineas = 'Línea: %D/%D'+#13#10+'Contenido: %S';
var
  i: integer;
  temporal: TStrings;
begin
  temporal := TStringList.Create;
  try
    temporal.LoadFromFile('C:\archivo.txt');

    { Aquí ya tienes en la variable temporal
      el contenido de "archivo.txt", de tal
      manera que podrías acceder al mismo
      línea por línea, como por ejemplo se
      hace a continuación. }

    for i := 0 to temporal.Count-1 do
    begin
      ShowMessage(Format(rsLineas, [i, temporal.Count, temporal[i]]));
    end;

  finally
    temporal.Free;
  end;
end;
__________________
David Esperalta
www.decsoftutils.com
Reply With Quote
  #5  
Old 21/11/2005
dec's Avatar
dec dec is offline
Moderador
 
Join Date: Dec 2004
Location: Alcobendas, Madrid, España
Posts: 13,142
Poder: 36
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Me doy cuenta de que en mi anterior mensaje he mezclado un tanto las respuestas para este Hilo y para este otro Hilo... Espero, aún así, que puedas sacar algo en claro. Si no es así avisa, por favor.
__________________
David Esperalta
www.decsoftutils.com
Reply With Quote
  #6  
Old 21/11/2005
ber ber is offline
Miembro
 
Join Date: Nov 2005
Posts: 12
Poder: 0
ber Va por buen camino
Post Gracias

Lo que dices de los hilos pues si la verdad es que al principio no supe donde encajaba mi pregunta y la puse aqui, ya despues me di cuenta que existia la de varios y pues hice una pregunta parecida alla, disculpas por eso.

Muchas gracias por tu ayuda.

Saludos
Reply With Quote
Reply



Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump


All times are GMT +2. The time now is 00:09.


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