PAUSE - это процедура
Пауза в Msecs
PAUSE( <MSecs>[<DisProcessMessages>] )
PAUSE( 10000 )
Полезные функции
Функции Delphi