Quote Originally Posted by Memphis
for the sake of better assembling, it is worth removing the begin and end....

Code:
while &#40;GetTickCount - StartTime&#41; < Duration do
  Application.ProcessMessages;
Are you sure compiler doesn't make this to equal code anyway? Not that i would put begin..end on 1 command cases but still.