Nun, erstmal danke, das hat schonmal sehr weitergeholfen. Das einizige verbleibende Problem ist die Zeile
while ((GetTickCount - FirstTickCount) < Milliseconds) do ...
erstmal habe ich so eine while Schleife noch nie gesehen und das
< wird auch als nicht korrekt angezeigt.
Ja, das mit der Hilfe hab ich gelesen, hat mir aber nichts gebracht, weil da nicht stand was ich gesucht habe. Jaja, immer diese Anfänger