Updated installer

This commit is contained in:
binarymaster 2014-11-14 02:03:31 +03:00
parent bca7e90e48
commit c146bb8838
3 changed files with 15 additions and 2 deletions

Binary file not shown.

View File

@ -688,6 +688,10 @@ begin
SuppLvl := 2;
if (FV.Release = 6002) and (FV.Build = 18005) then
SuppLvl := 2;
if (FV.Release = 6002) and (FV.Build = 19214) then
SuppLvl := 2;
if (FV.Release = 6002) and (FV.Build = 23521) then
SuppLvl := 2;
end;
if (FV.Version.w.Major = 6) and (FV.Version.w.Minor = 1) then begin
SuppLvl := 1;
@ -699,6 +703,10 @@ begin
SuppLvl := 2;
if (FV.Release = 7601) and (FV.Build = 22750) then
SuppLvl := 2;
if (FV.Release = 7601) and (FV.Build = 18637) then
SuppLvl := 2;
if (FV.Release = 7601) and (FV.Build = 22843) then
SuppLvl := 2;
end;
if (FV.Version.w.Major = 6) and (FV.Version.w.Minor = 2) then begin
if (FV.Release = 8102) and (FV.Build = 0) then
@ -725,10 +733,12 @@ begin
if (FV.Version.w.Major = 6) and (FV.Version.w.Minor = 4) then begin
if (FV.Release = 9841) and (FV.Build = 0) then
SuppLvl := 2;
if (FV.Release = 9860) and (FV.Build = 0) then
SuppLvl := 2;
end;
case SuppLvl of
0: begin
Writeln('[!] This version of Terminal Services is not supported.');
Writeln('[-] This version of Terminal Services is not supported.');
Writeln('Send your termsrv.dll to project developer for support.');
end;
1: begin
@ -736,6 +746,9 @@ begin
Writeln('It means you may have some limitations such as only 2 concurrent sessions.');
Writeln('Send your termsrv.dll to project developer for adding full support.');
end;
2: begin
Writeln('[+] This version of Terminal Services is fully supported.');
end;
end;
end;
@ -868,7 +881,7 @@ end;
var
I: Integer;
begin
Writeln('RDP Wrapper Library v1.3');
Writeln('RDP Wrapper Library v1.4');
Writeln('Installer v2.2');
Writeln('Copyright (C) Stas''M Corp. 2014');
Writeln('');

Binary file not shown.