Ветеран
Сообщения: 1264 Благодарности: 1024
Профиль | Отправить PM | Цитировать
function InitializeSetup: Boolean; var ResultCode: Integer; begin Result := Exec(ExpandConstant('{cmd}'), '/c ping -n 2 google.ru|find "TTL="', '', SW_HIDE, ewWaitUntilTerminated, ResultCode) and (ResultCode = 0); end;
Отправлено: 11:28, 11-10-2019 | #369