Das große Lotto-Spiel - Bet and Win

[Martin K]

Mir fällt grad auf, dass Du die Schleife mit den Lottozahlen immer so durchläufst:
for i:=1 to 1 do 1. Was für einen Sinn hat eine Schleife, die von 1 bis 1 läuft?
2. Wie hast Du denn genau TLottozahlen definiert, zeig mal Deine Typendeklaration!

TIniFile geht so:

Delphi-Quellcode:

uses
  {...,} IniFiles;

{...}

var
  ini: TIniFile;

{...}

ini := TIniFile.Create( {Dateiname} );  //Datei erzeugen
try
  //hier machst Du was mit ini

  //einen String, der in Edit1.Text steht, speichern:
  ini.WriteString('Sektor', 'Wert', Edit1.Text);
  //am besten schaust Du Dir jetzt die erzeugte Datei mal an, dann weißt Du was mit Sektor und Wert gemeint ist

  //einen String aus der ini-Datei auslesen und in Edit1.Text schreiben:
  Edit1.Text := ini.ReadString('Sektor', 'Wert', '');
  //im letzten Parameter (wo '' steht) wird der Default-Wert angegeben, d.h. der String der in Edit1.Text geschrieben wird, wenn ein Eintrag mit dem Namen 'Wert' in der Datei nicht vorhanden ist.

finally
  ini.Free;  //Datei freigeben
end;