Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для El Sanchez

Ветеран


Contributor


Сообщения: 1264
Благодарности: 1024

Профиль | Отправить PM | Цитировать


Цитата Raymans:
при запуске скрипт проверяет сайт и если он пингуется то не установится программа.ну а если пинга нет то устанавливается программа. »
Raymans,
Скрытый текст

Код: Выделить весь код
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