CreateFile Hook (PWideChar zu String)

[core]

Hallo!

Ich hab CreateFile folgendermaßen gehookt:

Delphi-Quellcode:

{...}
function myCreateFile(lpFileName:PWideChar; dwDesiredAccess, dwShareMode:DWORD;
  lpSecurityAttributes: pointer; dwCreationDisposition, dwFlagsAndAttributes,
  hTemplateFile: DWORD): DWORD; stdcall;
begin
  MessageBox(0, lpFileName, '', 0);

  result := nextCreateFile(lpFileName, dwDesiredAccess, dwShareMode,
              lpSecurityAttributes, dwCreationDisposition, dwFlagsAndAttributes,
              hTemplateFile);
end;
{...}

Mir geht es um den Dateinamen (vollständigen Path) der gerade erstellten Datei.
Dieser müsste sich ja in lpFileName befinden.

Die eigentliche Frage: Wie wandle ich diesen PWideChar in einen normalen String um?

mfg

[brechi]

Delphi-Quellcode:

var
bla: String;
begin
  bla := lpFileName;