Immer +1 nehmen

[nahpets]

Hallo,

wo hast Du Anzahl definiert? Als globale Variabel oder in der Methode, die die Addition vornehmen soll?
Anzahl muss global definiert sein und einmal mit 0 initialisiert werden.

Oder probiere mal, ob Du ausschließlich mitEdit1.Text := FloatToStr(StrToFloatDef(Edit1.Text,1) + 1); auskommst. Von der Aufgabenstellung her, sollte das eigentlich reichen.