//В драйвере
typedef struct OPEN_FILE_INFO
{
   LARGE_INTEGER    FileSize;
   BOOLEAN              ReadOnly;
   UCHAR                  DriveLetter;
   WCHAR                 FileName[MAX_PATH];
}
TOPEN_FILE_INFO, *POPEN_FILE_INFO;

//В Delphi
type
 TOpenFileInfo = record
   FileSize: LARGE_INTEGER;
   ReadOnly: Boolean;
   DriveLetter: UCHAR;
   FileName: Array [0 .. MAX_PATH - 1] of WCHAR;
 end;

 POpenFileInfo = ^TOpenFileInfo;
 
var
 OpenFileInfo: POpenFileInfo;
begin
 GetMem(OpenFileInfo, SizeOf(TOpenFileInfo));
 ZeroMemory(@OpenFileInfo.FileName, MAX_PATH);
 CopyMemory(@OpenFileInfo.FileName, PWideChar('\\??\\C:\\FileNameTest.txt'), Length('\\??\\C:\\FileNameTest.txt') * SizeOf(WCHAR));