Spielplan entwickeln mit INI-Datei

[fabgo]

Hallo ihr,

Ich entwickle einen Spielplan.
In meinem Programm gibt es vier Editierfelder. (Datum, Uhrzeit, Spieltyp)
Per Buttonklick werden die Strings der Editierfelder in einer Ini-Datei gespeichert.
Der Abschnitt heißt immer wie der String aus dem jeweiligen Editierfeld Datum + eine Integerzahl.

In einem weiteren Editierfeld soll der Nutzer die Möglichkeit haben, ein Datum einzugeben und dann alle Termine angezeigt bekommen.

So sieht meine Lösung aus, nur wie definiere ich (weiter unten) "Irgendeine Integerzahl" anstatt hier: J:=2 ?

Wie mach ich das dann, das alle angezeigt werden.

Bitte helft mir, hab nicht viele Kenntnisse. Danke!!!

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
I:=I+1;
Wort:=Edit1.Text+FloatToStr(I);
Wort2:=Edit4.Text+FloatToStr(I);
  begin
  //TIniFile wird geladen
  with TIniFile.Create(ExtractFilePath(ParamStr(0)) +  'data.ini') do
   try
    //Top wird geschrieben, Left wird geschrieben
    WriteString(Wort, 'Edit1', Edit1.text);
    WriteString(Wort, 'Edit2', Edit2.text);
    WriteString(Wort, 'Edit3', Edit3.text);
    ReadSections(Listbox1.Items);
   finally
    //Ini wird freigegeben
    Free;
  end;
end;
end;
procedure TForm1.FormActivate(Sender: TObject);
begin
 I:=0;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
J:=2;
Wort3:=Edit4.Text+FloatToStr(J);
  with TIniFile.Create(ExtractFilePath(ParamStr(0)) +  'data.ini') do
  if SectionExists(Wort3) then
  begin
    Edit4.Text:='Juhu, es funzt';
    ReadSection(Wort3, Listbox2.Items);
  end
  else begin Edit4.Text:='NÖ!';
  end;
end;