Speicherproblem mit Memofeld

DoctorT4ever · Hält's aus hier Beiträge: 7

Speicherproblem:
Ich möchte die Daten aus dem Memofeld speichern/laden lassen können,
frage: Womit???

-memo1.Lines.SaveToFile('highscores.txt'); --> Hierbei kann der Anwender nicht den Speicherort oder Dateinamen festlegen.

-savedialog1.execute; --> wie kann ich da den dateinamen/typ vorher festlegen?

...noch was =) :

Vorrausgesetzt ich habe schon einige Ergebnisse im Memofeld und möchte meine gespeicherten Highscores laden und und hinzufügen.

hab mir folgendes nach bauernlogik ausgedacht, was nicht funzt:

"//if memo1.lines.count>0 then
//memo1.lines.add(LoadFromFile('highscores.txt'));
//sortieren;"

_________________
Das Leben ist ein sche*** Spiel, aber geile Grafik!

Gast Erhaltene Danke: 1

wieso machst du das nicht wie folgt...

button aufs Form, dann onClick ereignis und folgenden Code:

zum speichern des Memos...(im filter des Dialogs bitte den Dateityp festlegen)

markieren

Delphi-Quelltext

1:
2:
3:
4:

if Savedialog1.execute then
begin
memo1.lines.savetofile(savedialog1.filename);
end;

Um Einträge einem Memo hinzuzufügen machst du folgendes...

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

var
str : tstringlist;
begin
str := tstringlist.create;
str.loadfromfile('memodatei.irgendwas');
memo1.text := memo1.text + ' ' + str.text;
str.free;

Ok, das ist jetzt nicht die eleganteste Lösung aber ich hab kein Bock jetzt alles für dich zu testen. Probier einfach mal rum...

gruß

ixtreme

AndyB · Beiträge: 1173 Erhaltene Danke: 14 RAD Studio XE2

Zitat:

SaveToFile('highscores.txt');

Mit relative Pfadangaben kannst du dein blaues Wunder erleben. Diese sind immer relativ zum aktuellen Verzeichnis. Und dieses kann während dein Programm läuft verändert werden (z.B. durch OpenDialog/SaveDialog).

_________________
Ist Zeit wirklich Geld?

Gast Erhaltene Danke: 1

ja deswegen besser so:

markieren

Delphi-Quelltext

1:	SavetoFile(extractfilepath(paramstr(0)) + 'highscore.txt');

gruß

ixtreme.de

DoctorT4ever · Hält's aus hier Beiträge: 7

markieren

Delphi-Quelltext

1:	SavetoFile(extractfilepath(paramstr(0)) + 'highscore.txt');

könnt ihr mir diesen befehl bitte einmal erklären? kann dem nicht so ganz folgen und man sollte doch sein programm schon selbst erklären können...

Moderiert von Klabautermann: Code durch Delphi-Tags ersetzt.

_________________
Das Leben ist ein sche*** Spiel, aber geile Grafik!

Ehemaliges Mitglied Erhaltene Danke: 1

Du brauchst doch nur die dir unbekannten wörter in der Delphi Hilfe nachschlagen. Und jetzt erzähl mir bitte nicht, dass Du nur D7 Enterprise auf englisch hat und die englische Hilfe nicht verstehst.

Gast Erhaltene Danke: 1

save to file = Speichern in Datei

extractfilepath = Dateipfad extrahieren

paramstr(0) = dort steht der dateiname von deiner datei drin.

+ 'highscore.txt' = praktisch der Pfad (c:\blablabla\) + Dateiname.txt also c:\blablabla\dateiname.txt

fertig!

Gruß

ixtreme.de

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme