Die Schleife für das linke "Vorschaufenster" besser noch mit einem Timeout versehen.
z.B. maximal 1000 Durchläufe oder maximal 5 Sekunden
Gibt z.B. mal 5, 1 und 0 ein.
Und wenn Start- kleiner Stopp-Wert, dann
Dec() verwenden ... also quasi ein downto.
PS: Ein Screenshot kann nie schaden.
[add]
Zitat:
---------------------------
Forbasic2delphi
---------------------------
Die Schleife wird nicht durchlaufen.
---------------------------
OK
---------------------------
für
for a = 1 to 2 step 3 do
stimmt nicht, denn einmal wird es durchlaufen, nämlich mit dem (Start)Wert 1.
Tipp: Das "a" auch noch veränderbar machen.