Sleepだとアプリが固まってしまうだろ
この手の場合、TTheadかTTimerを使うべき