>>DECLARE INTEGER GetPrivateProfileString IN Win32API ; >> String cSection, String cKey, String cDefault, String @cBuffer, ; >> Integer nBufferSize, String cINIFile >> >>lcBuffer = SPACE(255) + CHR(0) >> >>*-- Replace tcSection, tcEntryName and lcINIFile with valid information of >>*-- your ini file. >>lnNumBytes = GetPrivateProfileString(tcSection, tcEntryName, "", ; >> @lcBuffer, LEN(lcBuffer), lcINIFile) >>? LEFT(lcBuffer, lnNumBytes) >>>>
>>CD yourprojectdir >>DO setx >>x = createobject("cINIFile") >>*-- Again replace the variables >>? x.Get(tcSection, tcEntryName, "ERROR", tcINIFile) >>>>