Aus Ini Datei lesen

[hoika]

Hallo,

deinen Code mal etwas formatiert

Delphi-Quellcode:

  ini :=Tinifile.Create('System.ini');   // siehe #2
  try
    Anzahl1 := ini.ReadInteger('Button', 'M', 0);
  finally
   ini.Free;
  end;

  if Anzahl1 = 0 then
  begin
    Anzahl1 := 1;

   // wo wird hier Anzahl and AnzahlS gesetzt

  end 
  else 
  Begin
    Anzahl1 := Anzahl1 + 1;
    Anzahl  := Anzahl1;
    AnzahlS := IntToStr(Anzahl);
    Buttonspeichern;
  End;

Heiko