Obtener tamaño de archivo con error

[jars]

Hola amigos, estoy usando hace ya algun tiempo la siguiente funcion para obtener el tamaño de un archivo pero en un cliente que tiene instalado Windows server 2008 standard de 32 bits esta funcion debuelve una fecha:

Código Delphi [-]
function GetHugeFileSize(const Filename: TFileName): Int64;
var
  SearchRec: TSearchRec;
begin
  if FindFirst(Filename, faAnyFile, SearchRec) = 0 then
  begin
    Result := (Int64(SearchRec.FindData.nFileSizeHigh) shl 32)
               or SearchRec.FindData.nFileSizeLow;
    FindClose(SearchRec);
  end else
    Result := -1;
end;

Alguien tiene idea de que puede estar pasando?
Si existe otra forma de tomar el tamaño exacto de un archivo en una unidad de red comentenla.
Gracias.