FUNCTION ReadIni(cSection, cEntry, cIniFile)

   LOCAL ret_val
   DECLARE INTEGER GetPrivateProfileString IN Win32API  AS GetPrivStr ;
           String cSection, String cKey, String cDefault, String @cBuffer, ;
           Integer nBufferSize, String cINIFile
   ret_val = SPACE(1024)
   GetPrivStr(cSection, cEntry,"",@ret_val,1024,cIniFile)

RETURN STRTRAN(ALLTRIM(ret_val), CHR(0), "")


FUNCTION WriteIni(cSection, cEntry, cString, cIniFile)

   DECLARE INTEGER WritePrivateProfileString IN Win32API AS WritePrivStr ;
           String cSection, String cKey, String cValue, String cINIFile
   WritePrivStr(cSection,cEntry,cString,cIniFile)

RETURN ""