Go to most recent revision | Blame | Last modification | View Log | RSS feed
; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author: A.N.Other <myemail@nowhere.com>
;
; Script Function:
; Template AutoIt script.
;
; ----------------------------------------------------------------------------
#include-once
#include <GUIConstants.au3>
Func EnvLocal($scope)
Local $envloc = "HKCU\Environment"
If $scope = "System" Then
$envloc = "HKLM\System\ControlSet001\Control\Session Manager\Environment"
EndIf
return $envloc
Endfunc
Func updatePath(ByRef $inpubox)
Local $text = FileSelectFolder ( "Select folder", "" , 1 )
If $text <> "" Then
GUICtrlSetData($inpubox, $text)
EndIf
EndFunc
Func installLibs($GELpath, $scope)
$envloc = EnvLocal($scope)
RegWrite($envloc,"GEL_INCLUDE","REG_EXPAND_SZ",$GELPath & "\include")
RegWrite($envloc,"GEL_LIB","REG_EXPAND_SZ",$GELPath & "\lib")
RegWrite($envloc,"GEL_BIN","REG_EXPAND_SZ",$GELPath & "\bin")
$Path = RegREad($envloc,"Path")
RegWrite($envloc,"Path","REG_EXPAND_SZ",$Path & ";" & "%GEL_BIN%")
MsgBox(0,"Info","Added " & $GELpath & " to path",5)
EndFunc
Func makeSolution($GELpath, $msvcVer, $libType, $scope)
$envloc = EnvLocal($scope)
EndFunc