Запрет повторного запуска приложения

[FaTaL]

Всем доброго времени суток. Помогите пожалуйста решить вопрос.
Есть программа, запуск которой хочу запретить из одной и то же папки. Из других папок можно.
Пытаюсь запретить так:

  CreateMutex(nil, false, PChar(ExtractFilePath(ParamStr(0)) + 'MyProg'));
  if GetLastError = ERROR_ALREADY_EXISTS then
    begin
      MessageBox (0, 'Программа уже запущена. Повторный запуск возможен только из другой папки.', 'Информация',
                  MB_OK or MB_ICONINFORMATION);
      exit;
    end;
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;

Программа легко запускается откуда только можно, в том числе и из той же папки.
Если делаю через Ansi функцию CreateMutexA, то программа действительно перестаёт запускаться из этой же папки. Т.е. защита от повторного запуска работает как надо.
Но компилятор ругается (W1044 Suspicious typecast of string to PAnsiChar) на вот это:

  CreateMutexA(nil, false, PAnsiChar(ExtractFilePath(ParamStr(0)) + 'MyProg'));
  if GetLastError = ERROR_ALREADY_EXISTS then
    begin
      MessageBox (0, 'Программа уже запущена. Повторный запуск возможен только из другой папки.', 'Информация',
                  MB_OK or MB_ICONINFORMATION);
      exit;
    end;

Как быть? Забить на варнинг компилятора? И почему не отрабатывает Unicode фукнция как надо?
З.Ы. Версия Delphi 10.4. Весь этот код в файле DPR,а не в юните формы.

UPD
Оказывается не совсем работает ANSI версия корректно. Если в этой же папке создать еще одну папку и скопировать туда ЕХЕшник, то она так же ругается, что уже запущен. Но полный путь то изменился.
Я так понимаю, что то с созданием Мютекса не то. Может ему не нравятся символы из пути типа ":" или ""

[FaTaL]

Короче оставил Юникодную функцию, но все символы в строке с путём к папке заменил на = вместо \ и теперь работает нормально.