Hab es jetzt gerade ganze Zeit ausprobiert.Habe es zwar nicht mit einer Ini geschafft aber mit einer txt und ich glaub es ist ja das gleiche.
Also bis jetzt geht es,jetzt weiss ich nicht wie ich Edit1 bei jedem Start +1 addiere.
Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
List := TStringList.Create;
try
List.LoadFromFile('C:\Daten.txt');
if List.Count>0 then
Edit1.Text:=List[0];
finally
List.Free;
end;
begin
///Edit1 soll hier jetzt +1 addiert werden. Wie?
end;