Light Installer Script (LIS) - DiskSpan_GUI

[Cesar82]

Originally Posted by Lord.Freddy

Hi Cesar82, Thank you for the script you made, but i have a problem when adding the skin(cjstyles) with INI code, the skin is not added, So i made some changes:

#if !defined(StyleFile)
  #define StyleFile "NULL"
#else
  #define StyleParam ""
  #if Pos("|", StyleFile) > 0
    #define StyleParam Trim(Copy(StyleFile, Pos("|",  StyleFile + "|") + 1, Len(StyleFile)))
      #expr StyleParam = StyleParam + ".ini"
    #if (StyleParam != "") && (LowerCase(ExtractFileExt(StyleFile)) == "cjstyles")
      #expr StyleParam = StyleParam + ".ini"
    #endif
    #define StyleFile Trim(Copy(StyleFile, 0, Pos("|",  StyleFile) - 1))
  #endif
  #if (LowerCase(ExtractFileExt(StyleFile)) != "vsf") && (LowerCase(ExtractFileExt(StyleFile)) != "cjstyles") && (LowerCase(ExtractFileExt(StyleFile)) != "she")
    #define StyleFile "NULL"
  #endif
#endif

if you like, add these changes to your Script

FIX:

#if !defined(StyleFile)
  #define StyleFile "NULL"
#else
  #define StyleParam ""
  #if Pos("|", StyleFile) > 0
    #define StyleParam Trim(Copy(StyleFile, Pos("|",  StyleFile + "|") + 1, Len(StyleFile)))
    #define StyleFile Trim(Copy(StyleFile, 0, Pos("|",  StyleFile) - 1))
    #if (StyleParam != "") && (LowerCase(ExtractFileExt(StyleFile)) == "cjstyles")
      #expr StyleParam = StyleParam + ".ini"
    #else
      #define StyleParam ""
    #endif
  #endif
  #if (LowerCase(ExtractFileExt(StyleFile)) != "vsf") && (LowerCase(ExtractFileExt(StyleFile)) != "cjstyles") && (LowerCase(ExtractFileExt(StyleFile)) != "she")
    #define StyleFile "NULL"
  #endif
#endif