Stringgrid Abspeicherung...

[Forlan]

Schönen guten Abend zusammen...

Vermutlich lässt sich meine Frage schon durch die Überschrift erklären.
Wie kann ich die Cells eines Stringrids abspeichern und natürlich so auch wieder in genau die vorherige Position wieder laden???

Wenn es einen ähnlichen Beitrag schon gab, entschuldige ich mich hierfür :stupid:
Bitte dann ggf. um einen Link.

Danke im Vorraus! :cheers:

[mkinzler]

Etwa so

Delphi-Quellcode:

Assign( tf, 'grid.txt');
Rewrite( tf);
for i := 0 to StringGrid1.RowCount -1 do
    Writeln(tf, StringGrid.Rows[i].CommaText);

Getippt und nicht getestet

[Forlan]

hmm ok ich versuchs mal... danke trotzdem^^

[Luckie]

Zitat:

Zitat von Forlan

Schönen guten Abend zusammen...

Vermutlich lässt sich meine Frage schon durch die Überschrift erklären.
Wie kann ich die Cells eines Stringrids abspeichern und natürlich so auch wieder in genau die vorherige Position wieder laden???

Wenn es einen ähnlichen Beitrag schon gab, entschuldige ich mich hierfür :stupid:
Bitte dann ggf. um einen Link.

Danke im Vorraus! :cheers:

Das Forum hat eine Suche!

[Forlan]

von welchem Dateityp ist denn deine Variable Tf ??

[mkinzler]

TextFile

[Forlan]

nun ja, dann funktioniert es leider nicht^^ hab ich auch versucht, aber es kommt die Fehlermeldung:
Inkompatible Typen: TPersistent und Text

[Forlan]

Zitat:

Zitat von Luckie

Zitat:

Zitat von Forlan

Schönen guten Abend zusammen...

Vermutlich lässt sich meine Frage schon durch die Überschrift erklären.
Wie kann ich die Cells eines Stringrids abspeichern und natürlich so auch wieder in genau die vorherige Position wieder laden???

Wenn es einen ähnlichen Beitrag schon gab, entschuldige ich mich hierfür :stupid:
Bitte dann ggf. um einen Link.

Danke im Vorraus! :cheers:

Das Forum hat eine Suche!

Die Suche hab ich selbstverständlich vorher ja genutzt, aber nichts gefunden :wink:

[mkinzler]

Nimm AssignFile() statt Assign()

[Forlan]

Zitat:

Zitat von mkinzler

Nimm AssignFile() statt Assign()

Super funtioniert, danke!!!

Und wie läuft das dann mit dem anschließenden Laden???

[mkinzler]

Delphi-Quellcode:

Assign( tf, 'grid.txt');
Reset( tf);
while not eof( tf) do
begin
    inc(i);
    StringGrid.RowCount := i;
    s := ReadLn((tf); 
    StringGrid.Rows[i-1].CommaText := s;
end;

Du weisst schon Getippt ...

[Forlan]

Delphi-Quellcode:

VAR s: ????

^^... du weißt schon...^^

[mkinzler]

string
War aber nicht Schwer zu erraten bei einer Textdatei :zwinker:

[Forlan]

Zitat:

Zitat von mkinzler

string
War aber nicht Schwer zu erraten bei einer Textdatei :zwinker:

dann gibts aber wieder eine Fehlermeldung, denn auf STRING bin ich auch schon selbst drauf gekommen^^ :wall: :-D

inkompatible typen: String und procedure

[mkinzler]

Delphi-Quellcode:

ReadLn(tf, s);

[Forlan]

Zitat:

Zitat von mkinzler

Delphi-Quellcode:

ReadLn(tf, s);

leider änder dies nichts an der Fehlermeldung... :wall: :pale:

[mkinzler]

In welcher Zeile kommt der Fehler?

[Forlan]

hat sich schon erledigt, lag an mir -.-
aber leider funktioniert das Laden trotzdem nicht...
Aber trotzdem danke für die vielen Tipps mKinzler...
wenn du noch eine Idee hast, dann kannste die ja schreiben^^

[mkinzler]

Was bedeutet funktioniert nicht?

[Forlan]

funktioniert nicht bedeutet, dass nichts in die Cells des Stringgrids eingetragen wird... :(
...
und es erscheint jetzt auch eine Fehlermeldung:

Im Projekt ist eine Exception der Klasse EInOutError mit der Meldung 'E/A Fehler 32' aufgetreten.

[mkinzler]

Garnichts?
Welchen Wert hat .ColCount?

[Forlan]

siehe vorigen Beitrag...

Im Projekt ist eine Exception der Klasse EInOutError mit der Meldung 'E/A Fehler 32' aufgetreten.

[Luckie]

Zitat:

Zitat von Forlan

Die Suche hab ich selbstverständlich vorher ja genutzt, aber nichts gefunden :wink:

Das kan ich dir jetzt irgendwie nicht glauben: stringgrid abspeichern oder mit Google delphi stringgrid abspeichern.

[mkinzler]

Die Datei scheint noch geöffnet zu sein

[Forlan]

ja das Problem ist schon behoben... aber es wird trotzdem nichts in die cells geschrieben...

[hoika]

Hallo,

Delphi-Quellcode:

s := ReadLn((tf);
StringGrid.Rows[i-1].CommaText := s;

F5, F7, F8 verwenden !

F5 auf die erste Zeile und dann mal das s und i in die Watch-Liste.


Heiko