Path de proceso

[Ramsay]

Hola , encontre esta funcion que me devuelve el path de un proceso de windows , tengo un programa que lista todos los procesos y los muestra en una lista , esta funcion funciona bien pero casi todos los paths los devuelve en chino , soloy muy pocos se ven los paths reales.

Funcion:

Código Delphi [-]

function GetPathFromPID(const PID: cardinal): string;
var
  hProcess: THandle;
  path: array[0..MAX_PATH - 1] of char;
begin
  hProcess := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, false, PID);
  if hProcess <> 0 then
    try
      if GetModuleFileNameEx(hProcess, 0, path, MAX_PATH) = 0 then
        RaiseLastOSError;
      result := path;
    finally
      CloseHandle(hProcess)
    end
  else
    RaiseLastOSError;
end;

¿ Porque pasa esto ? ¿ Se puede solucionar ?