mirror of
https://github.com/stascorp/rdpwrap.git
synced 2024-11-09 09:48:21 +00:00
Installer: Extract rfxvmt.dll if missing (#194)
This commit is contained in:
parent
180f41197a
commit
1223417ca1
@ -641,7 +641,7 @@ end;
|
||||
|
||||
procedure ExtractFiles;
|
||||
var
|
||||
RDPClipRes, S: String;
|
||||
RDPClipRes, RfxvmtRes, S: String;
|
||||
OnlineINI: TStringList;
|
||||
begin
|
||||
if not DirectoryExists(ExtractFilePath(ExpandPath(WrapPath))) then
|
||||
@ -685,6 +685,7 @@ begin
|
||||
end;
|
||||
|
||||
RDPClipRes := '';
|
||||
RfxvmtRes := '';
|
||||
case Arch of
|
||||
32: begin
|
||||
ExtractRes('rdpw32', ExpandPath(WrapPath));
|
||||
@ -692,6 +693,8 @@ begin
|
||||
RDPClipRes := 'rdpclip6032';
|
||||
if (FV.Version.w.Major = 6) and (FV.Version.w.Minor = 1) then
|
||||
RDPClipRes := 'rdpclip6132';
|
||||
if (FV.Version.w.Major = 10) and (FV.Version.w.Minor = 0) then
|
||||
RfxvmtRes := 'rfxvmt32';
|
||||
end;
|
||||
64: begin
|
||||
ExtractRes('rdpw64', ExpandPath(WrapPath));
|
||||
@ -699,11 +702,16 @@ begin
|
||||
RDPClipRes := 'rdpclip6064';
|
||||
if (FV.Version.w.Major = 6) and (FV.Version.w.Minor = 1) then
|
||||
RDPClipRes := 'rdpclip6164';
|
||||
if (FV.Version.w.Major = 10) and (FV.Version.w.Minor = 0) then
|
||||
RfxvmtRes := 'rfxvmt64';
|
||||
end;
|
||||
end;
|
||||
if RDPClipRes <> '' then
|
||||
if not FileExists(ExpandPath('%SystemRoot%\System32\rdpclip.exe')) then
|
||||
ExtractRes(RDPClipRes, ExpandPath('%SystemRoot%\System32\rdpclip.exe'));
|
||||
if RfxvmtRes <> '' then
|
||||
if not FileExists(ExpandPath('%SystemRoot%\System32\rfxvmt.dll')) then
|
||||
ExtractRes(RfxvmtRes, ExpandPath('%SystemRoot%\System32\rfxvmt.dll'));
|
||||
end;
|
||||
|
||||
procedure DeleteFiles;
|
||||
|
Binary file not shown.
Loading…
Reference in New Issue
Block a user