speichern von var

[Hador]

Du könntest dass ganze auch folgendermaßen machen.
Das ist - finde ich - bei wenigen Daten noch einfacher:

Delphi-Quellcode:

program Project2;

{$APPTYPE CONSOLE}

var
  F: TextFile;
  var1, var2: string;
  var3, var4: Integer;

begin
  //Variablen initialisieren

  var1 := 'bla';
  var2 := 'blubb';
  var3 := 42;
  var4 := 0;

  //Datei öffnen und die Daten Zeile für Zeile abspeichern

  AssignFile(F, 'DATEINAME');
  Rewrite(F);
  Writeln(F, var1);
  Writeln(F, var2);
  Writeln(F, var3);
  Writeln(F, var4);
  CloseFile(F);

  //Variablen "leeren"

  var1 := '';
  var2 := '';
  var3 := -1;
  var4 := -1;

  //Datei öffnen und die Daten Zeile für Zeile auslesen

  AssignFile(F, 'DATEINAME');
  Reset(F);
  Readln(F, var1);
  Readln(F, var2);
  Readln(F, var3);
  Readln(F, var4);
  CloseFile(F);

  //Variablen in Konsole ausgeben

  Writeln(var1);
  Writeln(var2);
  Writeln(var3);
  Writeln(var4);

  Readln;
end.

Das ist mal 'n komplettes Beispielprogramm.