wir haben schon sehr viel Aufwand für die Suche nach einer Lösung spendiert,
hat jemand eine bessere Idee ?
Direkt gestartet geht der Ansatz aber nicht im Batch Script mode für Puppet und JENKINS zusammen
Delphi-Quellcode:
@if (@CodeSection == @Batch) @then
@echo off
rem Use %SendKeys% to send keys to the keyboard buffer
set SendKeys=CScript //nologo //E:JScript "%~F0"
start "" /B radstudio_10_4_esd_104203a.exe /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SLIPFILE=concurrent_000000.slip /FEATURES=delphi_windows
ping -n 10 -w 1 127.0.0.1 > NUL
%SendKeys% "Y"
rem Wait for 10 minutes until installation is done and kill sdksetup.exe in case it appears
rem Feel free to remove these steps in case they are not required or to change the waiting time
ping -n 600 -w 1 127.0.0.1 > NUL
taskkill /f /im sdksetup.exe >nul 2>&1
goto :EOF
@end
// JScript section
var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.SendKeys(WScript.Arguments(0))