WaitMsg - это функция
Выполняется, мол, процесс
WaitMsg( <text>, Msg, , <IsButCancel=False>, <IsAddtxt=False>, <IsDisableWin=True> )
WaitMsg( 'Обработка данных' )
Полезные функции
Функции Delphi
WaitMsgB