Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Mehrere Text-Dateien in ein TMemo? (https://www.delphipraxis.net/10752-mehrere-text-dateien-ein-tmemo.html)

mlspider 24. Okt 2003 20:39

Re: Mehrere Text-Dateien in ein TMemo?
 
Grundüberlegung ist die: Es werden mehrere einzeilige asf-Dateien in eine Memo-Komponente geladen. Der nächste Schritt wäre die nach "http://" erscheinende IP auszuschneiden und den Rest zu behalten.
Anschließend sollen alle im Memo geladenen Dateien mit der neuen Ip ersetzt werden. Und zum Schluß sollen die asf-Dateien wieder mit der neuen IP überschrieben werden. Das heißt: jeweils nur eine Zeile pro Datei, wie Sie geladen wurde. :wall:

Christian Seehase 24. Okt 2003 20:42

Re: Mehrere Text-Dateien in ein TMemo?
 
Moin mlspider,

warum liest Du nicht eine Zeile ein (entspricht ja, wenn ich das richtig verstanden habe eine Datei), bearbeitest sie, und schreibst sie dann, einzeln, wieder zurück?
Oder hab' ich da jetzt irgendetwas missverstanden?

mlspider 24. Okt 2003 20:49

Re: Mehrere Text-Dateien in ein TMemo?
 
Weil es sich um mehrere hundert Dateien handelt. Wie kann ich denn nun nach dem erfolgreichen IP-Wechsel (Dank Deines Code), auch jede einzelne Zeile im Memo auch in einer Datei speichern, ohne das alle Zeilen in jeder Datei steht?

Christian Seehase 24. Okt 2003 21:07

Re: Mehrere Text-Dateien in ein TMemo?
 
Moin mlspider,

ich hoffe Dich jetzt richtig verstanden zu haben:
Statt Memo1.Lines.SaveToFile aufzurufen, machst Du es umgekehrt wie beim einlesen.
Du übergibst Zeile für Zeile an eine TStringList und schreibst die dann.

mlspider 24. Okt 2003 21:14

Re: Mehrere Text-Dateien in ein TMemo?
 
Schön, hört sich einfach an. Wäre aber wiederum lieb, Du würdest mir ein kleines Code-Beispiel geben.

Danke!!!

Christian Seehase 24. Okt 2003 21:19

Re: Mehrere Text-Dateien in ein TMemo?
 
Moin mlspider,

die Routine vom Einlesen umzudrehen, solltest Du aber inzwischen auch so hinbekommen.

mlspider 24. Okt 2003 21:24

Re: Mehrere Text-Dateien in ein TMemo?
 
Irgendwie kann ich nicht mehr folgen. Gib mir bitte mal ein Code-Beispiel für die Umkehr

Christian Seehase 24. Okt 2003 21:28

Re: Mehrere Text-Dateien in ein TMemo?
 
Moin mlspider,

Delphi-Quellcode:
slWork.Text := Memo1.Lines[i];
slWork.SaveToFile(UndHierImmerDerEntsprechendeDateiPfad)
damit müsstest Du eigentlich klarkommen.
Das "schmückende Beiwerk" steht ja schon weiter oben.

mlspider 24. Okt 2003 21:38

Re: Mehrere Text-Dateien in ein TMemo?
 
Danke erstmal für Deine Mühen!!!!! Werde es jetzt ausprobieren. Allerdings der Blick auf meine Uhr straft mich schon wieder. Ich muß ja wenigstens ein paar Stunden schlafen, an sonsten wird mein Chef morgen irre, wenn meine Augen zufallen.

Wenn Du willst, gib mir mal Deine E-Mail. Meine lautet: mlspider@web.de


Gruß Mario

Christian Seehase 24. Okt 2003 21:46

Re: Mehrere Text-Dateien in ein TMemo?
 
Moin mlspider,

guckst Du hier (unten in der Leiste) ;-)

Code:
               ||
               ||
               ||
              \  /
               \/


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:55 Uhr.
Seite 3 von 3     123   

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