XYplorer Beta Club

Code: Select all

if !(regexmatches(getsectionlist("<section>"), "^<key>=")) { true if <key> doesn't exist... }

Code: Select all

[GENERAL]
Order=Normal|Guitar Video|Pictures and Wallpaper|Dual - Pics and Walls|Links and Catalog|Movies-Video-TV
Favorite=
CurrentSession=Normal
CTBindex=5
FolderChangeOnlyLocations=Guitar Video|Links and Catalog|Movies-Video-TV|Normal

Code: Select all

    $section = "General";
    $key     = "NewPath"; // Try it e.g. with "NewPath | DPIs" (the latter doesn't exist)
    if (isKey($section, $key))    { msg "key exists!"; }
    if (hasValue($section, $key)) { msg "val exists!"; }

function isKey($section, $key) {
    $isKey = regexmatches(getsectionlist($section), "^" . $key . "=.*?(?=\r?\n|$)");
    if ($isKey) { return true; }
    return false;
}

function hasValue($section, $key) {
    $isKey = regexmatches(getsectionlist($section), "^" . $key . "=.*?(?=\r?\n|$)");
    if ($isKey && gettoken($isKey, 2, "=", "t", 2) != "") { return true; }
    return false;
}

Code: Select all

        $cmdline = <<<CMD_LINE
cmd /c Find /I  "Favorite" "C:\Users\____\Documents\workingOnNow\genini.txt"
CMD_LINE;
         $cmdline = Replace($cmdline, "<crlf>", ' ');
        $a= Runret($cmdline, , 0, 0);
          wait 500;
          }
          text $a;

Code: Select all

    $section = "General";
    $key     = "DPI"; // Try it e.g. with "NewPath | DPIs" (the latter doesn't exist)
 switch (isKeyValue($section, $key)) {
   case 1:
      msg "key only exists!"; break;
   case 2:
      msg "key and val exists!"; break;
  default:
      msg "no key exists!";
  } 

function isKeyValue($section, $key) {
    $isKey = regexmatches(getsectionlist($section), "^" . $key . "=.*?(?=\r?\n|$)");
    if ($isKey) {
        if(gettoken($isKey, 2, "=", "t", 2) != "") { return 2; }
        else {return 1; }
    }
    else {return 0;}

Code: Select all

text getkey("XXX", "General", 4:="FAIL"); //FAIL