Bei der VCL ist es ganz leicht: Sie ziehen die Timer-Komponente auf Ihr Formular, stellen das Intervall ein, klicken doppelt drauf ... und schreiben den Code, der nach Erreichen des Intervalls ausgeführt werden soll. Viel schwerer ist es mit dem API aber auch nicht.
Mit der Funktion "SetTimer" stellt uns das API einen Timer zur Verfügung. Wir brauchen eigentlich nur das Handle des übergeordneten Fensters, eine ID für den Timer und das Zeitintervall (in Millisekunden). Der vierte Parameter der Funktion ist für uns in dem Fall nicht von Interesse. Rückgabewert ist dann das Handle des Timers:
hTimer := SetTimer(hWnd, IDC_TIMER, {Intervall von 1sec ->} 1000, nil);