ich weiß nicht wie oft ich das schon runterprädige:
Keine Ansi/Wide/dynamischen Varianten mischen!
CreateFile + PChar (Char / String) - diese sind seit Delphi 2009
Unicode und davor
Ansi
CreateFileA + PAnsiChar (AnsiChar / AnsiString)
CreateFileW + PWideChar (WideChar / WideString / UnicodeString)