Mit "EncryptFileA" und "EncryptFileW" hab ich das selbe Problem mit der
DLL.
CreateFile(PChar(Path), GENERIC_READ, 0, nil, OPEN_EXISTING, $00004000, 0);
Den Ersatz "$00004000" akzeptiert Delphi zwar, allerdings ist das Ordnerattribut nicht gesetzt. Es wird nur ein ganz normaler Ordner erzeugt, hmm.