Číslovanie .txt súboru

Dobrý deň.
Chcel by som Vás poprosiť o radu ako by som vyriešil nasledovné :
Mám program v ktorom vytrovím .txt súbor. Ale neviem ako by som vyriešil číslovanie .txt súboru a ako by som docielil to aby sa mi do toho txt súboru ukladali údaje a nie prepisovali. napr. cez LabeledEdit1 vložím slovo HURÁ to sa mi uloží do txt súboru a nasledne keď tam vložím slovo RADOSŤ tak slovo HURÁ sa mi vymaže. A potrebujem aby sa mi tie .txt súbory číslovali.
Ďakujem za radu
Mám takýto kód a potrebujem tam zahrnúť číslovanie .txt alebo potrebjuem aby mi zapísalo do druhého súboru a neprepisovalo mi ten pôvodný ktorý je už vytvorený :

Neviem sice, co za trieda je IOFileText, nikdy som sa s nou v Delphi nestretol a neviem ani nic vygooglit ( alebo zeby to bola tvoja trieda? Ak ano, uved jej deklaraciu a definicie clenskych metod ). Ale je pravda, ze som v Delphi nerobil uz dlhsie obdobie, takze zrejme sa jedna o novinku.
Ak by si to robil postarom, teda, priradit subor pomocou funkcie AssignFile, potom ak by si zavolal funkciu ReWrite, dany subor by sa bud vytvoril, alebo ak by existoval, jeho obsah by sa prepisal ( presne ako to robi tebe ). Ak by si ale miesto ReWrite zavolal funkciu Append, tak v pripade, ze subor existuje, zapisuje sa na koniec suboru a teda cely povodny obsah sa nezmaze. Priklad: http://www.delphibasics.co.uk/RTL.asp?Name=Append
Ak to ale predsa chces robit takto ( a trieda IOFileText nie je tvoja vlastna ), tak zial, bez dokumentacie ti neviem pomoct a na nete o tom nie je ziadna zmienka - aspon co sa delphi tyka.
K druhej otazke, k tomu cislovaniu, nie velmi som pochopil, ako to myslis. Ze ak povedzme existuje subor MojSubor.txt, tak nech program vytvori subor MojSubor(2).txt? Ak ano, existenciu suboru lahko zistis pomocou prikazu FileExists - http://www.delphibasics.co.uk/RTL.asp?Name=FileExists

Áno IOFileText je moja vlastná trieda ktorú som si vytvoril pre kontrolu súboru ktorý napíšem.
použil som v nej : napr.

procedure IOFileText.CreateTextFile(IOName : string);
begin
AssignFile(IOFile,IOName);ReWrite(IOFile);IOStat:=IOResult;
end;
A pri tom číslovaní je presne to čo som hľadal. Ďakujem za radu som samouk tak sa snažím ako viem.

Takze vsetko uz je jasne? Aj to zapisovanie na koniec? Pri tom zapisovani mozes jednoducho napisat dalsi kontruktor, ktory bude taky isty ako tento, akurat miesto ReWrite bude Append.

Áno teraz som to už konečne pochopil ako to treba urobiť
ďakujem za radu
Inak By som bol veľmi rád keby smi mi dal na teba nejaký skype alebo niečo podobné.

Pod kazdym mojim prispevkom je talcidlo ICQ s cislom (591843174), okrem ICQ nemam iny kontakt, iba e-mail, alebo ma niekedy najdes aj na IRC #pcforum.