Если в том же потоке кидаешь процедуру Sleep, то форма зависает, что не есть хорошо. Можно тогда пример с таймером и как получить инфу в параметре Sender?