NSIS得到上级文件夹路径

得到一个绝对路径，想得到上一级文件夹的路径怎么办呢？

道理很简单：分析绝对路径，找到最后一个'\'的位置，然后把前面的字符串拿出来。

函数：

Function GetParent
   Exch $R0
   Push $R1
   Push $R2
   Push $R3
   StrCpy $R1 0
   StrLen $R2 $R0
   loop:
     IntOp $R1 $R1 + 1
     IntCmp $R1 $R2 get 0 get
     StrCpy $R3 $R0 1 -$R1
     StrCmp $R3 "/" get
     Goto loop
   get:
     StrCpy $R0 $R0 -$R1
     Pop $R3
     Pop $R2
     Pop $R1
     Exch $R0
 FunctionEnd

使用方法：

Push "C:\Program Files\aaaa\bbbb"
 Call GetParent
 Pop $R0
 MessageBox MB_ICONEXCLAMATION|MB_OK "$R0"

弹出的结果就是：

C:\Program Files\aaaa

当然了，如果路径里面使用的是'/'，那函数里也就需要改成所有'\'了。