| | |
| Stránka: 1 z 1
| [ Príspevkov: 6 ] | |
Autor | Správa |
---|
Registrovaný: 26.03.12 Prihlásený: 27.03.12 Príspevky: 3 Témy: 1 | Napísal Nano: 26.03.2012 8:47 | |
|
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ý :
Kód: var doklad : IOFileText; begin doklad:=IOFileText.Create; doklad.CreateTextFile('C:\kniha\doklad.txt'); if doklad.IOStat=0 then begin doklad.WriteLnTextFile(MaskEdit1.Text);
|
|
Registrovaný: 11.01.09 Prihlásený: 25.04.24 Príspevky: 1385 Témy: 9 Bydlisko: Hrinova | Napísal Fico: 27.03.2012 10:30 | |
|
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
|
|
Registrovaný: 26.03.12 Prihlásený: 27.03.12 Príspevky: 3 Témy: 1 | Napísal autor témy Nano: 27.03.2012 17:46 | |
|
Á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.
|
|
Registrovaný: 11.01.09 Prihlásený: 25.04.24 Príspevky: 1385 Témy: 9 Bydlisko: Hrinova | Napísal Fico: 27.03.2012 18:01 | |
|
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.
_________________ Ak potrebujete pomoc s diagnostikou/opravou vasej elektroniky ( notebook, motherboard, GPU, a ine ), kontaktujte ma cez SS. |
|
Registrovaný: 26.03.12 Prihlásený: 27.03.12 Príspevky: 3 Témy: 1 | Napísal autor témy Nano: 27.03.2012 18:56 | |
|
Á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é.
|
|
Registrovaný: 11.01.09 Prihlásený: 25.04.24 Príspevky: 1385 Témy: 9 Bydlisko: Hrinova | Napísal Fico: 27.03.2012 19:50 | |
|
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.
|
|
| Stránka: 1 z 1
| [ Príspevkov: 6 ] | |
Podobné témy | Témy | Odpovede | Zobrazenia | Posledný príspevok |
---|
| upload txt suboru v PHP, ASP | 24 | 1142 | 10.07.2008 12:06 rooobertek | | ulozenie suboru txt VB v Delphi, Visual Basic | 1 | 830 | 01.01.2010 12:08 B.A.X.O | | Upravovanie txt suboru pomocou php v PHP, ASP | 4 | 610 | 14.01.2009 6:58 JanoF | | PHP citanie z TXT suboru v PHP, ASP | 6 | 1061 | 12.06.2010 10:54 kexo | | Riešenie pre otvorenie txt súboru 1x v Ostatné | 15 | 742 | 16.09.2017 13:12 martinius96 | | zapis do txt suboru pomocou javascriptu v JavaScript, VBScript, Ajax | 11 | 734 | 22.01.2015 23:15 chrono | | Zapis zo txt suboru do excelu.. v Delphi, Visual Basic | 0 | 564 | 19.07.2011 19:14 kotlas6667 | | Sťahovanie web stránky do txt súboru v Ostatné | 7 | 673 | 14.11.2017 7:37 BX | | C++ kombinatorika/zapis do txt suboru v Assembler, C, C++, Pascal, Java | 2 | 1181 | 13.04.2011 22:46 blabla630 | | Obnova .txt súboru v win XP v Operačné systémy Microsoft | 6 | 456 | 29.03.2009 12:30 shiro | | PHP skript, vyber udajov z TXT suboru v PHP, ASP | 6 | 1000 | 10.12.2009 19:39 stenley | | Nacitanie dat z unl/txt suboru do oracle v Databázy | 8 | 1466 | 31.10.2008 20:08 El_locco | | [Pascal] - písanie do .txt súboru s ponechaním predchodzieho obsahu v Assembler, C, C++, Pascal, Java | 11 | 492 | 19.05.2016 9:37 Miso122 | | Word Cislovanie v Ostatné programy | 4 | 754 | 09.05.2011 0:03 KatjushaMan | | [Word] Cislovanie stran v Ostatné programy | 7 | 7346 | 10.06.2010 17:25 skanzen | | Cislovanie vo Worde v Ostatné programy | 3 | 707 | 26.08.2008 21:15 Kosak |
| Nemôžete zakladať nové témy v tomto fóre Nemôžete odpovedať na témy v tomto fóre Nemôžete upravovať svoje príspevky v tomto fóre Nemôžete mazať svoje príspevky v tomto fóre
|
|