From 8673ae59a6757ad98222513dca7e5ea069c530f6 Mon Sep 17 00:00:00 2001
From: Alexandr Chivarzin <admin@sccraft.ru>
Date: Mon, 16 May 2022 20:34:34 +0300
Subject: [PATCH] Fix RDPWinst.exe -w in first time

---
 src-installer/RDPWInst.dpr | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/src-installer/RDPWInst.dpr b/src-installer/RDPWInst.dpr
index 848e31b1..0b04ccf5 100644
--- a/src-installer/RDPWInst.dpr
+++ b/src-installer/RDPWInst.dpr
@@ -1106,11 +1106,7 @@ begin
 
       Writeln('[*] Terminating service...');
       AddPrivilege('SeDebugPrivilege');
-      //KillProcess(TermServicePID);
-      WinExec('cmd /c net stop UmRdpService /y', 1); //fix for Hyper-V VMs
-      Sleep(1000);
-      WinExec('cmd /c net stop termService /y', 1);
-      Sleep(1000);
+      ExecWait('cmd /c net stop termService /y');
 
       if Length(ShareSvc) > 0 then
         for I := 0 to Length(ShareSvc) - 1 do