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;