FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
El memo sólo me acepta una línea
Hola a tod@s.
tengo un problemilla bastante tonto, y NECESITO UNA MANO Debo leer un fichero .txt y transformarlo en otro. Para minimizar los accesos al disco lo cargo en un Memo (Memo1) y, al transformarlo lo voy pasando a un segundo Memo (Memo2), pues bien, el destino solo me admite una línea (la primera que trata sea cual sea), y además la trunca. Código:
var wEntrada, wSalida : String[153]; begin // limpieza del memo de salida y de errores Memo2.Clear; Memo3.Clear; // bucle de tratamiento del memo de entrada PageControl1.ActivePage:=TabSheet2; Memo3.Lines.Append('***** Comienzo del proceso *****'); while (i<Memo1.Lines.Count) and (i<15) do begin wEntrada:=Memo1.Lines[i]; wSalida:=wEntrada; Memo2.Lines.Append(wSalida); Memo3.Lines.Add(wSalida); showmessage('Línea '+Inttostr(i)+#13+wsalida); i:=i+1; // avanzar en el fichero de entrada end; Si le añado líneas: Memo2.Lines.Append('Hola') antes del Memo2.Lines.Append(wSalida) las reconoce bien, pero después de ejecutar una sola vez esta sentencia ya no admite nada más. ¿qué me está pasando?
__________________
Rafita. Última edición por rafita fecha: 07-03-2005 a las 10:07:18. |
#2
|
|||
|
|||
en dónde inicializas tu variable de control "i"?
|
#3
|
||||
|
||||
Quien sabe. Pero como esto pasó hace tres años, imagino que ya lo resolvió
// Saludos |
#4
|
|||
|
|||
Si, me di cuenta que es desde 2005, pero tal vez si alguien más anda buscando, como yo ahora, le sirva de referencia sobre la duda que no se resolvió en su momento.
Saludos |
|
|
|