integer-werte in eine datei speichern

[Affje]

Zitat von Christian Seehase:

Moin Affje,

z.b. mit einem TFileStream:

Delphi-Quellcode:

var
  fsOUT : TFileStream;
  iBuf  : integer;

begin
  fsOUT := TFileStream.Create('Pfad zur Datei',fmCreate or fmOpenReadWrite);
  try
    iBuf := 12352345;
    fsOUT.Write(iBuf,4);
  finally
    FreeAndNil(fsOUT);
  end;
end;

muss ich bei iBuf die zahlen 1235.. einsetzen, oder was muss ich da tun?? meine variable heisst leben, die ich speichern will, was muss ich dann tun?? sorry für die dummen fragen, aber ich kenne mich mit so zeug net so gut aus

[Tpercon]

Zitat von Meflin:

wenns mit d5 nicht geht, gehts vermutlich mit d6 auch net!
aber so könnts gehen:

Delphi-Quellcode:

var int: TStringList;
begin
int[0] := inttostr(integer);
int.savetofile(dateiname);
end;

und zum laden

Delphi-Quellcode:

int.loadfromfile(dateiname);
integer := strtoint(int[0]);

So geht's bestimmt auch nicht! Die StringLsite muß zuerst erzeugt werden! Außerdem fügt man mit Add() etwas hinzu. Du greifst einfach auf das 1 Element der lIste zu, ohne das du weißt ob das existiert.... Gibt also schöne Fehlermeldungen.

[Christian Seehase]

Moin Affje,

iBuf steht für die Variable, die den zu speichernden Wert enthält.
Wenn die bei Dir leben heisst, musst Du nur iBuf gegen leben austauschen.

[Affje]

so nochmal ich:
und was bedeutet dann die 123...??? die integervariable leben in meinem spiel ändert sihc doch stöndig, dann kann ich ja keinen bestimmten wert reinspeichern.

[Christian Seehase]

Moin Affje,

das war ein Beispiel.

Du kannst das ja z.B. als Funktion/Prozedure ausführen:

Delphi-Quellcode:

procedure SaveIntegerToFile(const AsFilepath : string;const AiValue : integer);

var
  fsOUT : TFileStream;

begin
  fsOUT := TFileStream.Create(AsFilePath,fmCreate or fmOpenReadWrite);
  try
    fsOUT.Write(AiValue,4);
  finally
    FreeAndNil(fsOUT);
  end;
end;

[Affje]

das soll auf jeden fall ausgeführt werden, wenn man das prog beendet, also in dem falle dann form1.close...
und AiValue steht wieder für leben oder was?? ih blicke einfach GAR NIX

[Christian Seehase]

Moin Affje,

Zitat von Affje:

AiValue steht wieder für leben oder was??

klar. Das ist eine Prozedur, ein Dateipfad und ein integer Wert als Parameter übergeben werden.
Was Du jetzt als integer Wert übergibst, bleibt Dir überlassen.

[Affje]

so ich nochmal. ich hatte in der letzten zeit nicht so viel zeit zum ausprobieren.
aber mal ne frgae: kann ich die ganze sache nicht einfach mit nem savedialog regeln??

[Christian Seehase]

Moin Affje,

kaum.
Ein SaveDialog dient nur dazu, den Pfad zu einer Datei auswählen zu können. Er speichert nicht.

[Affje]

ich ich kriege die andere methode nicht zum laufen!!!! wie soll ich ne neue prozedur anlegen, wenn es ein form1.onclose ereignis geben soll, ich checks nicht.