Installer: Allow to install INI from current directory (fix #300)
This commit is contained in:
parent
51b3421a65
commit
180f41197a
|
@ -1,5 +1,5 @@
|
||||||
{
|
{
|
||||||
Copyright 2016 Stas'M Corp.
|
Copyright 2017 Stas'M Corp.
|
||||||
|
|
||||||
Licensed under the Apache License, Version 2.0 (the "License");
|
Licensed under the Apache License, Version 2.0 (the "License");
|
||||||
you may not use this file except in compliance with the License.
|
you may not use this file except in compliance with the License.
|
||||||
|
@ -670,7 +670,19 @@ begin
|
||||||
OnlineINI.Free;
|
OnlineINI.Free;
|
||||||
end;
|
end;
|
||||||
if not Online then
|
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 := '';
|
RDPClipRes := '';
|
||||||
case Arch of
|
case Arch of
|
||||||
|
|
Loading…
Reference in New Issue