Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Prism Bestimmte Zeilen aus einer .txt löschen (https://www.delphipraxis.net/46400-bestimmte-zeilen-aus-einer-txt-loeschen.html)

vimo 24. Mai 2005 13:53


Bestimmte Zeilen aus einer .txt löschen
 
hallo.

ich bin ein neuling in der delphi-programmation und bin jetzt mal von der consolen-programmation auf die window-programmation umgestiegen, aber ich stosse hier auf ein paar kleinere problemchen.

während mein programm läuft, schreibt es eine Liste heraus, in der Werte vorkommen. Diese Liste wird momentan in einer unsichtbaren MenuList gespeichert.
also so z.b.

1
3
8
15
67

nun soll, nach ablauf des programms die jeweiligen zeilen (also im beispielfall die 1., die 3., die 8., die 15. und die 67. Zeile) entfernt werden. wichtig ist, dass die zeile nicht leer wird, sondern gelöscht wird.

ist dies irgendwie möglich. ich weiss dass es bereits einen ähnlichen thread hier einmal gab, aber er hat mir nicht sonderlih weitergeholfen. wäre froh wenn mir jemand da auf die sprünge helfen könnte.


vielen dank bereits im voraus.


mfg, vimo

glkgereon 24. Mai 2005 14:05

Re: Bestimmte Zeilen aus einer .txt löschen
 
also .NET kenn ich net

aber ich geh ma davon das es nicht viel anders is...

um eine liste von nummern/daten zu speichern würde ich eine TStringList nehmen.

dann (Schematisch)

Delphi-Quellcode:
Nummern:=TStringList.Create;
Datei:=TStringList.Create;
Datei.LoadFromFile;
AddZeilenNummern(Nummern);
for i:=0 to Nummern.COunt-1 do
  Datei.Delete[StrToInt(Nummern[i])];
Datei.SaveToFile;

vimo 24. Mai 2005 14:40

Re: Bestimmte Zeilen aus einer .txt löschen
 
hab das mal versucht, scheint aber nicht zu klappen. an der delete-funktion hapert es. liegt aber auch vielleicht an meinen schlechten programmierkenntnissen. vielen dank trotzdem schonmal


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz