agregar registros a un fichero txt

[guillotmarc]

Hola.

Para manejar archivos planos, te recomiendo que utilizes un TStringList (consulta la ayuda de Delphi).

Mediante el método LoadFromFile, podrás cargarle los datos en el arhivo de texto, y mediante la propiedad Strings, podrás acceder a cada una de las filas, tan facilmente como si se tratará de una matriz.

Para detectar si en un fichero existe un elemento, yo simplemente haria un recorrido de todas las filas del Fichero. Como lo vas a hacer en memória (en el TStringList), será muy rápido.

Saludos.

[@-Soft]

hola

bueno, pero necesito por lo menos un pequeñisimo ejemplillo que servira como punto de partida para armar la estructura del codigo necesario para poder hacer lo que se me ha propuesto, no obstante crees que pueda ser posible hacer esto por medio de una consulta bien condicionada, ya sabes if esto entonces aquello etc.

Salu2

[jachguate]

el código es muy sencillo. Cargas el texto en un TStringList (con LoadFromFile). Con un ciclo vas recorriendo uno a uno los registros... hasta encontrar el adecuado... entonces extraes la cantidad, le sumas el valor adecuado, y rehaces la línea. Si el ciclo llega a su fin sin encontrarlo.. entonces insertas un registro nuevo.

Si el volumen de datos es alto, será mejor mantener la lista ordenada e implementar un algoritmo de busqueda binaria. Al no existir, insertar la nueva línea en el StringList en la posición adecuada para no perder el orden.

hasta luego.

[guillotmarc]

Hola.

Además de lo que comenta Juan Antonio, puedes encontrar ejemplos, tal como es habitual, en la propia ayuda de Delphi.

Escribe TStringList, y pulsa F1 encima. Entrarás en la ayuda del StringList. Entra en el enlace "See also" y en "Working with string lists" tienes todos los ejemplos que te puedan hacer falta : carga de un archivo de texto, recorrido, manipulación, grabación en un archivo, ...

Saludos.