Da Fortschritt eine lokale Variable ist, wird sie bei jedem OnTimer-Ereignis neu gesetzt, un da du ihren Wert nicht bestimmst(bzw. nur 1 draufaddierst) ist der Wert unbestimmt(bzw. nicht initialisiert). Am besten bestimmst du Fortschritt im private-Teil der Form als Eigenschaft und setzt es beim OnCreate auf 0.
Delphi-Quellcode:
type
TForm1 = class(TForm)
private
Fortschritt: Integer;
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
Mfg