Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Eine Datei in 3 Memos laden (https://www.delphipraxis.net/37054-eine-datei-3-memos-laden.html)

TheMiller 30. Dez 2004 12:09


Eine Datei in 3 Memos laden
 
Hey Leute,

bräuchte mal wieder eure Unterstützung..

Ich lade mittels Stringliste die Inhalte von 3 Memos in eine Datei. Jetzt möchte ich den Inhalt, der zu Memo1 gehörte, wieder in Memo1 laden, den Inhalt von Memo2 in Memo2 usw. laden.

Wie mache ich das am Besten? Ich habe das noch nie gemacht. Es könnte evtl was mit pos() oder so zu tun haben, oder?

Wäre für einen Codeschnipsel mit Erklärung sehr sehr dankbar!

Wie immer, Danke im Vorraus

Bye!

PS: Auch mein Glückwunsch! :sharkylinchen:

Airblader 30. Dez 2004 12:14

Re: Eine Datei in 3 Memos laden
 
Also wenn du in der Datei nicht irgendwie deutlich machst (Seperator) was zu was gehört geht das schlecht :wink:

TheMiller 30. Dez 2004 12:16

Re: Eine Datei in 3 Memos laden
 
Naja, einen Seperator eintragen ist ja auch nicht gerade die Welt. Dann nehmen wir doch einfach ein ";"...ok?

glkgereon 30. Dez 2004 12:23

Re: Eine Datei in 3 Memos laden
 
naja, wenns ein text is besser net, da würde ich eher sowas wie [/\Memo1/\] nehmen

und dann das:

Delphi-Quellcode:
Sep[1]:='[/\Memo1/\]';
Sep[2]:='[/\Memo2/\]';
Sep[3]:='[/\Memo3/\]';
Temp.LoadFromFile('x.y');
Memo1.Text:=copy(Temp.Text,0,Pos(Sep[1],Temp.Text));
Memo2.Text:=copy(Temp.Text,Pos(Sep[1],Temp.Text)+length(Sep[1],Temp.Text),Pos(Sep[2],Temp.Text));
Memo3.Text:=copy(Temp.Text,Pos(Sep[2],Temp.Text)+length(Sep[2],Temp.Text),Pos(Sep[3],Temp.Text));
event. bei den pos und so nochn +1 oder -1 hin, aber der ansatz müsste es sein....

achso:
so markiert [/\Memo1/\] das ende des "Memo1-Textes"

TheMiller 30. Dez 2004 12:25

Re: Eine Datei in 3 Memos laden
 
Cool, ich danke dir. Werde es mal testen und mich bei Fragen nochmal melden ;-)

TheMiller 30. Dez 2004 12:38

Re: Eine Datei in 3 Memos laden
 
Naja,

so ganz will es noch net. Ich habe jetzt daraus ein Array of String gemacht und dann bekomme ich in den letzten 3 Zeilen die Meldung vom Compiler: Inkompatible Typen..

Habe es auch mit array of Char probiert, doch dann sagt der Compiler bei den Sep[x]-Zeilen: Inkompatible Typen Char und String

Was nun?

glkgereon 30. Dez 2004 12:46

Re: Eine Datei in 3 Memos laden
 
dann setz jeweils die sachen ein...

sollte ein array of string sein...

TheMiller 30. Dez 2004 12:47

Re: Eine Datei in 3 Memos laden
 
Hm... das klappt bei mir aber nicht. Habe das auch noch nie gemacht :oops:

TheMiller 30. Dez 2004 21:08

Re: Eine Datei in 3 Memos laden
 
Hat niemand mehr eine Idee? *GanzVorsichtigNachfrag*

Nikolas 30. Dez 2004 21:29

Re: Eine Datei in 3 Memos laden
 
Pushen ist doch erst nach 24h erlaubt... :evil:

Du kannst auch einfach den gesamten Text von Memo1 in die erste Zeile der Datei schreiben und dann den Zeilenumsprung als Trennzeichen missbrauchen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:36 Uhr.
Seite 1 von 3  1 23      

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