Takhle, jak to chceš ty, to dělám (spíš dělal, když jsem začínal) vyjímečně u osmibitových PICů, ale taky se toho všude zbavuju a dělám to přes interrupt, můžu pak mezitím dělat jiný věci (analogie k 100% vytížení CPU a je to to samý, co chceš ty, abys mezitím mohl něco dělat). Navíc, to tvoje for bude závislé na frekvenci procesoru - na 1,5Ghz procesoru to bude 2x pomalejší než na 3Ghz CPU. Jak řekl předřečník, potřebuješ něco jako TTimer, bez toho mě fakt nenapadá, jak jinak to udělat (třeba jsem ale jen nezkušenej, v Delphi nedělám).