procedure CreateMutex(const Name: String);
Создаёт взаимное исключение с указанным именем Name задачи (процесса).