FoxPro/Visual FoxPro - leer archivo .ini

Hola
Tengo un archivo llamado PntReg.ini y contiene como dato 02 .quiero que mediante un programa en vfp8 lea el archivo y devuelva el valor que esta en el archivo.

Tengo este codigo

PARAMETERS RegPnt

LOCAL InFile

InFile = fopen("c:\PntReg.ini")

do while not feof(InFile)
RegPnt = fread(InFile,fseek(Infile,2)
enddo

fclose(InFile)

RETURN RegPnt

Pero da error RegPnt de tipo de dado

Gracias de antemano

Necesitas declarar el estatus de tus dll´s

DECLARE INTEGER GetPrivateProfileString IN Win32API AS GetPrivStr ;
String cSection, String cKey, String cDefault, String @cBuffer, ;
Integer nBufferSize, String cINIFile
DECLARE INTEGER WritePrivateProfileString IN Win32API AS WritePrivStr ;
String cSection, String cKey, String cValue, String cINIFile
&& DLL statements for reading/writing to system registry
DECLARE Integer RegOpenKeyEx IN Win32API ;
Integer nKey, String @cSubKey, Integer nReserved,;
Integer nAccessMask, Integer @nResult
DECLARE Integer RegQueryValueEx IN Win32API ;
Integer nKey, String cValueName, Integer nReserved,;
Integer @nType, String @cBuffer, Integer @nBufferSize
DECLARE Integer RegCloseKey IN Win32API ; Integer nKey

Suerte

si eliminas el ciclo ?