diff options
Diffstat (limited to 'src-installer/RDPWInst.dpr')
| -rw-r--r-- | src-installer/RDPWInst.dpr | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/src-installer/RDPWInst.dpr b/src-installer/RDPWInst.dpr index 3a97730..e5e43a6 100644 --- a/src-installer/RDPWInst.dpr +++ b/src-installer/RDPWInst.dpr @@ -1,5 +1,5 @@ { - Copyright 2016 Stas'M Corp. + Copyright 2017 Stas'M Corp. Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License. @@ -670,7 +670,19 @@ begin OnlineINI.Free; end; if not Online then - ExtractRes('config', ExtractFilePath(ExpandPath(WrapPath)) + 'rdpwrap.ini'); + begin + S := ExtractFilePath(ParamStr(0)) + 'rdpwrap.ini'; + if FileExists(S) then + begin + OnlineINI := TStringList.Create; + OnlineINI.LoadFromFile(S); + S := ExtractFilePath(ExpandPath(WrapPath)) + 'rdpwrap.ini'; + OnlineINI.SaveToFile(S); + Writeln('[+] Current INI file -> ', S); + OnlineINI.Free; + end else + ExtractRes('config', ExtractFilePath(ExpandPath(WrapPath)) + 'rdpwrap.ini'); + end; RDPClipRes := ''; case Arch of |