Easiest way to add & remove records from a text file?

[pierrotsc]

I have a text file and I would like to know on how to handle the adding and removing of records?
This is on how I read the text file:

Resultpath := GetCurrentDir;
if radiobutton1.checked then
begin
assignfile(f,resultpath+'\process.txt');
{$I-}
Reset(F);
{$I+}
while not eof(f) do
readln(f,datatext);
end;
That should take me at the end of the file. Now how do I add another string to it?
I think there's certainly a better way to handle that.
Thanks.
PO

 

[Glenn9999]

You can use Append to add text to the end of a text file. Otherwise, to add in the middle or remove text, you will have to rewrite the file.

 

[AP81]

You could always use a stringlist...

Use the stringlist.LoadFromFile procedure to load the file into the string list. Append/manipulate the records in the stringlist, then call the saveToFile procedure.

Here is an example:

http://www.delphibasics.co.uk/Article.asp?Name=Files

Take a look at the section:
"Using TStringList to read and write text files