Тип TProc перенесён в Global