Hi all,

I need to be able to read the Paradox NET DIR setting from inside one
of the applications I am working on. I've found the required code by
searching the BDE32.HLP file. However inside that routine is a call to
a routine called Check. I have not been able to discover what this
routine does or how to implement it.

I have modified the code to use IF statements to replace the Check
calls as below:

    If DbiOpenCfgInfoList(nil, dbiREADONLY, cfgPERSISTENT,
StrPCopy(Temp, Path), hCur) = DBIERR_NONE Then
      If DbiSetToBegin(hCur) = DBIERR_NONE Then
        repeat
          rslt := DbiGetNextRecord(hCur, dbiNOLOCK, @Config, nil);
          if rslt = DBIERR_NONE then
          begin
            if StrPas(Config.szNodeName) = Option then
              Result := Config.szValue;
            if Count <> nil then
              Inc(Count^);
          end
          else
            if rslt <> DBIERR_EOF then
// But what do I do with the line below????
              Check(rslt);
        until rslt <> DBIERR_NONE;
 the problem is that I don't know what Check is checking! or what
result it returns!!


Any Ideas gratefully received.

Paul

Reply via email to