Wait Message during block execute

If i'm executing a block of code that takes some time to run, how can I
display a wait message while the block is executing?  Even better, can the
message display one of those nifty TAnimation graphics while the block is

Thanks in advance

David Sweeney
Texas A&M University